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ABSTRACT 


This  simulation  is  a  versatile  SIMSCRIPT  program 
designed  to  determine  transportation  destination 
fluctuations  caused  by  U.S.  Naval  vessel  movements  in 
the  San  Francisco  Bay  area.  The  through-put  model  was 
designed  to  investigate  the  relationship  between  the 
annual  number  of  delivery  trips  and  the  average 
material  delivery  delay.  Numerous  parameters  have 
been  taken  into  consideration  in  the  generation  of  a 
model  that  is  as  realistic  as  possible.  Reguirement 
priority,  item  guantity,  customer  movement,  ultimate 
destination,  and  process  time  are  the  significant 
random  variables  which  have  been  assigned 
probabilistic  distributions.  In  view  of  the 
simulation  results,  it  would  appear  that  actual 
modification  of  the  current  shipping  parameters  may 
yield  substantial  t ransportaion  savings. 
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INTRODUCTION 


A.   BACKGROUND 


Naval  Supply  Center  (NSC),  Oakland,  California  is  one  of 
five  major  support  facilities  in  the  United  States  Navy. 
Approximately  600,000  line  items  have  been  positioned  at  NSC 
Oakland  to  provide  material  support  to  active  aid  reserve 
fleet  units,  lDcal  and  overseas  shipyards,  naval  air 
stations,  several  overseas  depots,  and  numerous  smaller 
commands.  It  also  has  the  capability  of  responding 
effectively  to  a  wide  variety  of  functional  tasks.  Those 
services  provided  include  accounting  functions,  household 
goods  storage  and  movement,  central  area  procurement, 
operation  of  a  fuel  support  facility,  and  support  to  foreign 
governments. 

NSC  Oakland  is  further  tasked  with  implementing  these 
mission  requirements  over  a  vast  area  of  the  giobe.  In 
fact,  it  includes  the  Pacific  Ocean  (Hawaii  Area  excluded), 
the  Indian  Ocean,  and  Northern  California. 

In  Northern  California,  direct  support  is  provided  to 
174  local  commands.  The  size  of  these  commands  varies  from 
a  major  shipyard  to  small  boats,  and  within  this  spectrum 
there  is  a  group  of  unique  customers.  They  are  U.  S.  Naval 
vessels  which  are  mobile;  each  ship  may  be  found  at  several 
different  locations  during  the  course  of  a  year.  Such 
movement  has  impact  on  the  material  segregation  fmction  and 
the  transportation   requirements   of   NSC   Oakland.    During 


fiscal  year  1978,  seventeen  vessels  represented  those  local 
customers  whose  transportation,  destinations  varied 
significantly.  Many  more  than  seventeen  ships  are 
homeported  in  the  Bay  Araa.  However,  the  other  vessels, 
when  present,  always  berthed  at  the  same  location.  Thus, 
their  delivery  distance  requirements  were  known.  The 
seventeen  mobile  customers  include: 

Eight  Auxiliary  Ammunition  Vessels  (AE's), 

Three  Auxiliary  Refrigerated  and  Stores  Vessels  (AFS's), 

Three  Auxiliary  Oiler  and  Replenishment  Vessels  (AOR's), 

Two  Mine  Sweeper  Ocean  Vessels  (MSO's), 

One  Auxiliary  Repair  Vessel  (AR)  . 

Table  1  is  a  statistical  review  of  all  vessels 
requisitions  as  documented  in  the  Historical  Demand  File  at 
NSC  Oakland  from  September  1977  to  September  1978.  It 
amplifies  the  relative  significance  of  vessel  support  on 
both  a  local  and  global  level.  Those  vessels  marked  by  a 
ii*ii  berthed  at  more  than  one  location  in  the  bay  area  during 
the  year  . 
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Taki§  N°i  li.    LQCAL  VESSEL  DEMAND  DATA. 
EB3M  i/7j  TO  9/78 


SHIP 

NUMBER  OF 

NUMBER  OF 

PERCENT  OF 

PERCENT  OF 

CLASS 

VESSELS 

DEMANDS 

LOCAL 

GLOBAL 

cv 

2 

33359 

12.9269 

3.8635 

DD 

1 

2413 

.3742 

.1118 

FF 

3 

22481 

3.4862 

1. 0420 

SS 

11 

18622 

2.3878 

.8631 

LKA 

1 

41  16 

.6383 

.  1908 

HHEC 

5 

4628 

.7177 

.2145 

WPB 

5 

4  26 

.0661 

.0197 

AE* 

8 

46422 

7.  1989 

2.  1516 

AFS* 

3 

46425 

7.1993 

2.  1517 

AOR* 

3 

25194 

3.9069 

1  .  1677 

AR* 

1 

35767 

5.5466 

1.6577 

MS°* 

2 

3926 

.6088 

.  1820 

TOTALS* 

17 

157734 

24 .46  00 

7.3106 

TOTALS 

45 

293779 

45.5576 

13.6160 

The  seventeen  -mobile  ships  represented  24.46  percent  of 
NSC  Oakland's  local  business  as  shown  in  Table  1.  The  ships 
in  this  group  were  found  to  change  location  from  as  few  as 
four  to  as  many  as  eighteen  times  in  a  one  year  period  (It 
should  be  noted  that  trips  in  which  vessels  returned  to 
their  place  of  departure  were  not  included)  .  A  mobile 
customer  located  at  NSC  Dakland  today  may  be  found  tomorrow 
at  the  Naval  Weapons  Station  Concord,  some  thirty-three 
miles  away.  Thus,  over  a  short  period  of  time, 
transportation  requirements  may  materialize  or  disappear. 
Such  fluctuations  have  had  a  significant  impact  on  the  Bay 
Area  Local  Delivery  (BALD)  system  which  transports  material 
from  NSC  Oakland  to  thesa  shins. 


B.   OBJECTIVE 
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It  is  the  intent  of  this  paper  to  quantify,  through 
simulation,  the  impact  of  local  mobile  customers  on  the 
transportation  requirements  of  NSC  Oakland's'  Bay  Area  Local 
Delivery  system  (BALD) . 


C.   SCOPE 


Simulation  was  chosen  as  the  technique  for  evaluation  of 

this  problem  for  the   following   reasons:  1.    The   actual 

material    transportation    requirements  for   the   mobile 

customers  were  not  available,  and  the  cost  to   obtain   such 
data   was   considered   to   be   prohibitive;   2.   Alternative 

delivery  schemes  can  be  evaluated  prior  to  imposing  them   on 
the  actual  system. 

Only  those  previously  identified  local  vessels,  their 
movements,  and  -che  associated  NSC  Oakland  material  support 
during  the  year  from  September  1977  to  September  1978  was 
considered  in  this  simulation. 

The  decision  parameters  utilized  included  both  empirical 
distributions  and  classical  distributions.  They  were 
developed  through  the  use  of  histograms  and  standard  data 
analysis  techniques.  However,  when  data  was  United,  some 
distributions  were  subjectively  developed.  This  approach 
was  taken  under  the  assumption  that  it  was  better  to  utilize 
what  information  was  avaiLable,  rathec  then  to  use  entirely 
arbitrary  values. 
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II.   ASSUMPTIONS  AND  PARAMETER  SVALUAIIDNS 


Exact  identification  and  quantification  of  all 
simulation  parameters  and  variables  is  not  only  a  formidable 
task  but,  in  general,  an  impossible  one.  It  is  apparent 
that  any  process  complex  enough  to  warrant  computer 
simulation  will  also  require  simplifying  assumptions.  In 
the  interest  of  realizing  a  viable  finding  within  a 
constrained  time  period  and  with  limited  assets,  numerous 
suppositions  were  required.  Whenever  possible,  each  premise 
has  been  analytically  or  logically  justified  in  the 
following  subsections. 


A.   M03ILE  CUSTOMERS 

The  vessel  movement  lata  analyzed  was  extracted  from 
fifty-four  weekly  Ships  Information  Bulletins  (NASUPPACT-30) 
published  by  the  Naval  Support  Activity,  Treasure  Island, 
San  Francisco,  California.  Appendix  A  is  an  example  of  one 
such  bulletin. 

Figure  1  is  a  graphical  representation  of  the  operating 
cycles  of  the  seventeen  port-mobile  vessels  for  fiscal  year 
1978.  It  is  the  basis  of  the  vessel  mobility  seotion  of  the 
simulation. 

1  ■   Shi£  Movement 

Ship  movement   between   local   Bay   Area   ports   was 
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assumed  to  be  a  Markov  Process.  As  a  consequence,  knowledge 
of  past  movements  of  a  vessel  will  not  change  the 
probability  of  moving  from  one  location  to  another  or, 
stated  differently,  the  system  is  memoryless  and  will  not 
modify  future  behavior  because  of  knowledge  of  past  movment. 
Thus,  a  stochastic  matrix  of  the  transition  process  from  one 
location  to  another  was  constructed. 

Since  ships  of  the  same  class  (for  example, 
Auxiliary  Ammunition  Vessels)  are  operationally  funded  at 
the  same  level,  operate  with  similar  life  cycles,  perform 
the  same  mission,  and  are  manned  at  the  same  compliment; 
ship  movements  were  aggregated  by  class  and  Markov  chains 
were  developed  for  each  class. 

Figures  2,  3,  4,  5,  and  6  show  the  matrices  for  each 
ship  class.  They  were  developed  by  first  identifying  the 
ports  visited  by  each  ship  class.  Those  ports  were  then 
annotated  on  the  left  vertical  and  top  horizontal  sides  of 
the  class  matrix.  Next,  these  vessels'  movements  (Figure  1) 
were  annotated  in  the  matrix  as  follows:  a.  The  initial 
location  of  a  vessel  was  identified  on  the  left  vertical 
side  of  the  matrix;  b.  The  location  that  this  vessel  next 
moved  to  was  then  noted  it  the  top  horizontal  side  of  the 
matrix;  c.  A  check  mark  was  then  entered  within  the  matrix 
based  on  these  two  locations.  This  procedure  was  then 
repeated  using  this  ship's  new  location  as  the  left  vertical 
starting  port  of  the  matrix.  When  all  the  vessel  movements 
within  a  class  had  been  processed,  the  probabilities  of 
movement  from  one  location  to  another  were  determined  across 
each  row  of  the  matrix  by  dividing  all  elements'  values  (sum 
of  a  group  of  check  marks)  in  a  row  by  the  total  row  sum. 

If  one  were  interested  in  determining  the 
probabilities  where  a  AF3  would  be  expected  to  move  given  it 
is   at   Alameda,   Figure  4  would  be  utilized.   Starting  with 
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HAS  Alam  on  the  left  vertical  side  one  would  move  along  this 
row  and  note  that  there  is  a  sixty  percent  chance  of  going 
to  NSC  Oakland  or  a  forty  percent  chance  of  deploying. 

2 •   Ib  Por^  Duration 

It  was  assumed  that  in-port  duration  times  were 
Independent  of  ship  type,  but  were  a  function  of  their 
associated  location.  Thus,  these  times  were  aggregated  by 
location  and  probabilistic  distributions  were  assigned.  It 
should  be  noted,  that  a  scarcity  of  data  and  difficulties  in 
fitting  this  data  has  resulted  in  some  uncertainty  about 
these   distributions. 

If  a  ship  was  conducting  local  operations  and 
returned  to  its  departure  location,  it  was  considered 
located  at  that  port  for  the  time  period  under 
investigarion.  However,  if  a  vessel  departed  and  returned 
to  another  local  port,  the  time  in  local  transit/operations 
was  included  in  the  arriving  location  calculation.  These 
time  periods  were  included  in  the  in-port  computations 
because  it  was  assumed  that  material  not  deliverei  prior  to 
a  vessels  departure  would  be  delivered  to  the  vessels  "new" 
location,  and  any  material  requirements  received  for  an 
underway  vessel  would  be  sent  to  the  "new"  port.  Also,  if  a 
vessel  departed  from  a  location  and  did  not  return  to  a 
local  port  within  sixty  days,  it  was  assumed  that  it  was  on 
a   eight-month   deployment    to    the    Western   Pacific. 

The  following  results  represent  the  number  of 
in-port  periods  contained  in  each  time  interval  and  is  a 
general  overview  of  the  time  frequency  results.  The  in-port 
time  interval  corresponds  to  a  cell  in  table  2.  In-port 
time  intervals  were  determined  by  first  calculating  the 
in-port    time    periods   for      all      vessels      which      visited      each 
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port.  These  periods  ware  then  sorted  by  port.  Time 
interval  (ceils)  were  next  selected  which  would  result  in 
approximately  five  in-port  duration  observations  per  cell. 
Due  to  the  extreme  spread  of  the  data  it  was  not  possible  to 
display  the  complete  cell  data  for  all  ports.  In  some  cases 
so  few  data  points  were  available  that  the  above  procedure 
could  not  be  done,  and  these  cases  were  ommitad  from  the 
Table.  In  other  cases  extreme  values  were  observed  which 
were  more  than  double  the  next  largest  value.  These  values 
were  in  general  considered  outliers  and  were  truncated  from 
the   data    set. 

For  example,  the  in-port  durations  for  N&S  Alameda 
were  calculated  utilizing  Figure  1.  They  were  then  ordered 
and  analyzed.  The  data  was  segmented  into  two  groups. 
Table  2  shows  the  first  three  ceils  of  this  segmentation. 
In  this  case,  each  cell  represents  four  days.  The  remainder 
of  the  distribution  was  also  observed  to  be  uniform  (no 
significent  upward  or  downward  trends)  and  they  ranged  from 
twenty-seven    to    one-hundred    and    twenty-nine   days. 

Table   No..    2_j_    IN- PORT    gRBQOSNCY    DATA 


PORT 

ALAMEDA 

MARE    IS 

OAKLAND 

CONCORD 

TREASURE    IS 

DEPLOYED 


ELL  1 
5 
6 
6 
7 
6 
9 


CELL    2 

5 
5 
4 
5 
7 


CELL    3 
5 
5 

2 

5 


These  results  are  presented  as  a  partial  explanation 
of  the  subjective  determination  of  the  in-port  time 
distributions.  Upon  completion  of  the  inter-departure  time 
analysis,      probabilistic      distributions      were      assigned        by 
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geographic  location   as    follows: 

a.  Naval  Station  Alameda:  The  in-port  time  is 
uniformly  distributed  between  four  and  seventeen  days  with 
probability  0.5,  and  uniformly  distributed  between 
twenty-seven  and  one  hundred  twenty-nine  days  with 
probability    .5. 

b.  Naval  Weapons  Station  Concord:  The  in-port  time 
was  found  to  be  exponentially  distributed  with  the  parameter 
egual   to    .06 12. 

c.  NSC  Oakland:  The  distribution  was  found  to  be 
uniform    between   nine   and   fifty-six   days. 

d.  Naval  Station  Treasure  Island:  The  in-port  time 
is  uniformly  distributed  between  three  and  seventy-eight 
days. 

e.  San  Francisco  Shipyard:  The  maintenance  time  was 
seven  days  with  a  .65  probability,  or  was  two-hundred-forty 
days    with    a    .35    probability. 

f .  Todd  Shipyard  (Alameda) :  The  time  distribution 
was  found  to  be  uniform  from  thirty-eight  to  eighty-four 
days. 

g.  Bethlehem  Steel  Shipyard  (San  Francisco)  : 
Maintenance  periods  were  either  thirty  or  one-hundred-eighty 
days   with    egual    probability. 

h.  Triple  A  Shipyard  (San  Francisco)  :  In-port 
time   was    found  to    be   seven    days. 

i.  Merritt  and  Pacific  Shipyards  (Oakland)  : 
Maintenance    time    was    forty-four    days    for    both   locations. 
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j.  Mare  Island  Naval  Shipyard:  The  maintenance 
periods  were  uniformly  distributed  between  three  and 
twenty-eight  days  with  probability  .668  or  uniformally 
distributed  between  forty-three  and  ninety-one  lays  with  a 
.332    probability. 

k.  Deployed:  The  time  in  this  catagory  was  assumed 
to  be  uniformly  distributed  between  fifteen  and  sixty  days 
with  probability  .65,  and  was  two  hundred  and  forty  days 
(eight-month  deployment  to  the  Western  Pacific)  with 
probability    .35. 
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B.   MATERIAL  REQUIREMENTS  AND  PROCESSING 


The  material  requirements  and  distribution  processes 
experienced  by  NSC  Oakland  were  reduced  to  a  series  of 
inter-related  functions.  The  criteria  for  this  breakdown 
was  twofold:  first,  the  function  must  be  estimatable;  and 
second,  only  realistic  processes  were  considered. 

Suosequent  paragraphs  discuss  the  various  assumptions 
and  procedures  undertaken  to  quantify  the  inter-linking 
segments  of  the  material  pipeline  under  investigation. 

1  •   Si§.^2£i2^i.  Pep  and  File 

Numerous  mechanized  data  bases  were  available  at  NSC 
Oakland.  However,  after  a  detailed  evaluation,  it  was 
decided  that  the  Requisition  Demand  History  File  (RDHF) 
would  provide  the  most  useful  data.  The  Requisition  Demand 
History  File  is  a  readily  available  mechanized  file 
encompassing  transactions  from  two  fiscal  years.  Figure  7 
depicts  the  standard  format  of  the  file's  five  possible 
one-hundred  character  records.  These  records  will  be 
discussed  below.  This  file  is  composed  of  those  material 
actions  (requisitions)  which  have  been  transferred  from  the 
Requisition  Status  File  because  of  their  historical 
significance.  Both  the  Requisition  Status  File  and  the 
Requisition  Demand  History  File  are  composed  of  records. 
The  initial  basic  entry  which  estaolishes  the  record  is  a 
requisition   and  other  pertinent  data  is  subsequently  added. 

A   record- by-recocd   scanning   of   the    Requisition 
Status   File   is  conducted  to  determine  which  records  should 
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be  retained  because  of  their  historical  value.  The 
following  decision  parameters  represent  the  significant 
catagories  of  records  which  are  transferred  to  the  RDHF[ 11  ]: 

a.  Requisitions  issued  with  and  without  proof  of 
shipment  as  follows:  (1)  if  the  record  has  been  in  the  file 
sixty  or  more  days,  without  proof  of  shipment,  a  Record  Type 
four  is  assigned;  (2)  if  the  record  has  been  in  the  file 
sixty  or  more  days  with  proof  of  delivery  and  the  issue 
group  is  one  or  two,  a  Record  Type  one  is  assigned;  (3)  if 
the  record  has  been  in  the  file  thirty  days  or  nore  with  a 
proof  of  shipment  and  the  issue  group  is  three,  a  Record 
Type  one  is  assigned. 

b.  Those  records  with  an  exception  supply  status 
(rejected/canceled)   as   follows:    (1)   requisitions  in  the 

"file  for  sixty  or  more  days  and  and  in  issue   group   one   or 

two   are  assigned   Type   Code  five;  (2)  requisitions  in  the 

file  for  thirty  or  more  days  and  in  issue   group   three   are 

assigned  a  Type  Cede  five. 

c.  Records  which  indicate  the  item  was  sent  to 
purchase  as  follows:  (1)  if  the  record  has  been  in  the  file 
ninety  or  more  days  without  purchase  order  data  and  is  in 
issue  group  one  or  two,  or  if  the  record  has  been  in  the 
file  thirty  days  or  more  without  purchase  order  data  and  is 
in  issue  group  three,  a  Type  Code  three  is  assigned;  (2)  if 
the  record  has  been  in  the  file  sixty  days  or  more  with 
purchase  order  data  and  the  associated  issue  group  is  one  or 
two  or  if  the  record  has  been  in  the  file  for  thirty  days  or 
more  and  the  issue  group  is  three,  a  Type  Cods  of  two  is 
assigned . 
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2.  Data    Base    Establishment 

Eight  standard  labeled  IBM  tapes  were  obtained  from 
NSC  Oakland.  These  tapes  were  generated  from  the  RDHF  and 
they  contained  all  material  transactions  from  September  1, 
1976  to  August  30,  1977.  Over  two  million  records  were  on 
these  tapes.  The  transactions  encompassed  local  material 
issues,  demands  for  material  not  stocked  at  NS3  Oakland, 
inter-depot  transfers  of  material,  and  local  procurements. 
The  customers  creating  the  majority  of  these  demands  for 
material  were  located  worli  wide  and  numbered  oyer  eight 
thousand. 

As  only  data  for  local  customers  was  desired, 
numerous  extraction  programs  were  developed.  The  resulting 
data  base  contained  only  issues  from  stock  for  local 
customers,  including  local  procurements.  Much  of  the 
purification  (duplicate  records  were  discovered)  and 
extraction  of  this  data  was  conducted  with  the  assistance  of 
N.  B.  Nelson,  LCDR,  SC,  QSN,  a  fellow  student  at  the  Naval 
Postgraduate  School.  Upon  completion  of  this  reduction 
approximately  600,000  records  (four  tapes)  remained  and  it 
was  from  this  base  that  the  vessel  data  was  developed. 

3 .  Data    Extraction 

Those  data  elements  actually  extracted  for  further 
analysis  were  common  to  all  file  records  and  in  the  same 
data  fields.  Specifically,  the  data  fields  used  were  as 
follows:  a.  the  document  number's  unit  identification  code 
(UIC)  and  date;  b.  the  date  received;  c.  the  supply 
action  date;  e.   the  quantity;  and  f.   the  priority. 
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The  Appendix  B  program,  AMG$DATA,  extracted  those 
records  from  the  local  customer  transactions  data  base  which 
met  the  following  conditions: 

a.  Only  those  records  of  the  previously  identified 
mobile  customers  were  considered. 

b.  Of  the  above  records,  only  those  records  which 
the  supply  status  code  indicated  that  material  had  been 
locally  issued  were  actually  extracted  (supply  status  code 
BA)  . 

Each  data  record  which  meet  the  above  criteria,  was 
also  coded  to  facilitate  the  identity  of  its  owner  and  the 
owner's  ship  class. 

4 .   Sample  Size 

In  most  cases  the  entire  data  base  was  used  in  the 
determination  of  the  simulation  parameters.  The  quantity, 
submission  time,  and  process  time  parameters  (as  described 
later  in  this  chapter)  were  the  only  varibles  in  which  a 
sample  was  intentionally  taken.  This  action  was  due  to  the 
limited  memory  space  available  for  the  execution  of  the 
FORTRAN  program  ANG$Dat1  and  to  keep  the  requirements  down 
to  reasonable  values  so  that  the  required  data  runs  could  be 
made.  In  another  case  (Issue  Group  One  priorities)  a 
smaller  sample  size  resulted  because  its  occurrance  was  very 
scarce. 

Tchebychef f ■ s  Theorem  of  Inequality  [12]  was 
utilized  to  determine  sample  size  because  normality  could 
not  be  assumed  to  describe  the  underlying  population. 

Since   it   was  desired  that  the  sample  mean  would  be 
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within  one  fifth  of  a  stindard  deviation  of  the  true  mean 
with  a  probability  of  at  least  0.95,  a  sample  size  of  500 
was  selected  whenever  possible. 

5 •   Data  Reduction 

The  FORTRAN  program  which  begins  the  data  analysis 
required  for  th9  simulation  model  is  ANG$DAT1,  Appendix  C. 
Numerous  data  arrays  were  developed  for  further  analysis,  as 
follows: 

a.  Total  daily  requisitions  submitted  by  each 
customer  were  represented  by  a  matrix  (365x17) .  The  365 
dimension  is  the  day  Df  the  year  the  requisition  was 
prepared,  and  the  17  dimension  represents  tha  seventeen 
vessels  under  consideration.  Quantities  within  the  matrix 
were  the  actual  number  of  requisitions  prepared  on  a 
specific  day  by  a  particular  vessel  (we  will  call  this  a 
requisition  bundle)  .  Date  differences  for  a  giv=n  customer 
within  this  matrix  will  be  called  the  "inter-preparation 
times"  for  the  bundles  shown. 

b.  From  the  quantity  field  of  the  first  500 
requisitions  per  local  customer  another  matrix  (500x17)  was 
developed.  This  was  done  because  the  data  base  was  random 
by  customer  and  the  quantity  was  assumed  to  be  independent 
of  the  ship's  location  and  time.  The  500  dimension  in  this 
data  array  corresponds  to  the  size  of  the  sample,  and  the 
seventeen  dimension  again  represented  those  vessels  under 
consideration.  The  actual  data  elements  in  the  matrix  were 
the  quantities  ordered  pec  requisition. 

c.  Submission  time  data  for  bundles  of  requisitions 
was  also  considered  independent  of  the  vessel  or  its  class, 
and   thus   only   one   sample   of  500  inter-arrival  times  was 
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extracted  by  selecting  every  one-hundred  and  eightieth 
requisition.  Its  value  was  computed  by  subtracting  the 
document's  date  of  preparation  from  the  data  of  the 
document's  receipt.  This  action  was  considered  appropriate 
since  groups  of  reguisitions  were  modeled,  and  it  was 
assumed  all  reguisitions  ready  for  submission  would  be 
submitted  together. 

d.  The  process  time  for  a  reguisition  was  modeled 
as  being  dependent  on  the  Issue  Group  of  the  reguisition. 
This  parameter  was  computed  by  subtracting  the  document's 
receipt  date  from  the  document's  ready  for  shipment  date, 
and  was  arranged  into  a  matrix (500x3)  .  The  533  dimension 
was  the  sample  size,  and  the  three  dimension  represents  the 
Issue  Group.  Individual  data  elements  corresponded  to 
process  times  per  reguisition  priority  by  NSC  Oakland. 

6 .   Bundle  Preparation  Time 

Appendix  D,  ANGSFHIS,  is  the  FORTRAN  program  which 
differenced  tthe  document  number  dat.es  as  recorded  in  the 
inter-preparation  time  matrix  and  utilized  tha  standard 
library  routine  HISTG  to  produce  a  listing  of  the  relative 
frequencies  of  times'  from  one  to  nine  days  for  each 
customer . 

Analysis  of  this  data  revealed  a  significant 
similarity  of  the  output  by  vessel  class.  Figures  8  and  9, 
and  Table  3  illustrate  this  similarity.  Note  the  small 
values  for  the  standard  deviations  of  tha  relative 
freguencies  at  the  bottom  of  Table  3.  Because  the  relative 
freguencies  were  so  alike,  the  vessels  were  grouped  by  class 
in  this  and  all  other  vessel  dependent  parameter 
evaluations. 
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Table    NOj_    3_._    RELATIVE    FREQUENCIES    OF    INTER-PREPARATION 

TIME 


AE     1 


TIMES  BETWEEN  BUNDLE  PREPARATIONS  IN  DAYS 


22    .51    .19    .14    .08    .06    .02 


24    .54    .15    .11    .09    .04    .02    .01    .02    .02 


25    .42    .20    .10    .10    .05    .04    .05    .02    .02 


26    .53    .18    .09    .09    .06    .00    .03    .02    .01 


29    .53    .20    .11    .08    .03    .03    .00    .01    .01 


32    .56    .13    .14    .07    .04    .02    .01    .01 


33    .46    .19    .03    .08    .08    .06    .02    .01    .02 


35    .53    .16    .11    .10    .06    .02    .01    .00    .01 


AVE   .516   .175   .112   .085   .053   .024   .014   .011   .002 


SI.DE  .046   .026   .021   .010   .016   .013   .016   .008   .003 
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Upon  completion  of  the  class  pooling  of  the  data 
several  probabilistic  distributions  were  examined  for 
applicability.  Since  the  histograms  were  exponentially 
shaped  this  was  the  first  distribution  tested.  The  inverse 
of  the  mean  value  was  used  as  the  exponential  parameter. 
However,  this  hypothesis  failed  the  Chi-square  goodness  of 
fit  test  at  the  five  per  cent  level. 

Next  an  attempt  was  made  to  fit  a  geometric 
distribution  to  the  data.  Inter-preparation  times  were 
measured  in  the  data  base  by  one  day  increments.  Therefore, 
geometric  parameters  were  established  by  assuming  that  if  a 
bundle  was  prepared  within  one  day,  there  were  zero  days  in 
which  a  bundle  was  not  prepared.  We  will  denote  P  as  the 
probability  of  a  bundle  being  prepared  in  one  day.  However, 
if  an  actual  bundle  required  two  days  to  prepare,  then  we 
will  assume  that  there  was  one  day  in  which  a  failure 
occurred,  i.e.  no  bundle  preparation,  and  then  a  success. 
If  a  bundle  required  three  days  to  prepare,  we  will  assume 
there  were  two  failures,  i.  e.  day  one  and  day  two  with  no 
bundle  preparations,  and  then  a  success;  and  so  on.  This 
results  in  a  classical  distribution  with  the  following 
probability  mass  function: 

x 

f(X)  =  P(1-P)   for  x  =  0,1,2,... 

where, 

x   =    the   number   of    "failures"    prior   to  a   success 

P   =    the    probability    of   a    success 

Unfortunately  this  distribution  also  failed  to  fit 
the  data,  although,  it  did  provide  a  better  chi-square 
statistic   -han    did    the   exponential   distribution. 
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A  combination  of  two  distributions  was  attempted 
next.  The  author  considered  this  approach  because  there  was 
a  strong  possibility  that  any  single  distribution  would  be 
overwhelmed  by  the  intar-preparations  of  one  day.  The 
hypothetical  probabilistic  distribution  was  constructed  as 
follows: 

1.  Inter^preparation  data  of  one  day  was  separately 
modeled.  Therefore,  the  probability  of  a  bundle  preparation 
occurring   within   one    day    was    equal   to    "P    ". 

2.  The  remaining  data  was  assumed  to  ba  geometric 
and   the    probability    of   preparing  a    bundle    in   two    lays,    "P   " , 

was   computed    from    the   remainder    of   the    data. 


Tha    detailed    derivation    of      the      above      distribution 


follows; 


f(X)     =    { 


P      for   x    =    0 

i 


C?     (1-P)        x    =    1,2,..., 

2  2 


where, 


P      =    probability   of    a   bundle    preparation    during 


the   first   day 


P   =  probability  of  a  bundle  preparation  in  two  days 

2 


f  (X)  =  probability  density  function 


x  =  number  of  days  with  no  bundle  preparations 


36 


General  solution  for  C: 

Q  X 

p  +   2Z_    cp  (1  -  p  )   =1 

1       X  =   1       2         2 

n 
CP  (1  -  P  l   ^~   (1  -  P  )  =  1  -  P 

2  2    x   =  0  2  I 

n  x 

^   (1  -  p  i   =  1/P  if  0<  (1  -  P  )  <1 

X  =  0  2  2  2 


:herefore 


C  =  (1  -  P  ) /(1  -  P  )   . 

1  2 


The  Chi-square  statistic  at  the  five  per  cent  level  of 
significance  and  with  nine  degrees  of  freedom  is  16.92.  One 
would  accept  this  hypothesis  if  the  computed  statistic  is 
less  than  or  equal  to  16.92.  The  computed  statistics  for  AE 
class,  AFS  class,  AOR  class,  MSO  class,  and  AR  class  vessels 
were  respectively  7.544,  10.917,  19.419,  11.450,  and  38.57. 
The  hypothesis  that  the  distribution  fits  the  data  is 
acceptable  in  three  of  the  five  classes.  The  AR  class, 
which  had  the  largest  error,  was  also  the  smallest  in  sample 
size  (  only  one  ship  was  in  the  sample  )  .  There  were  three 
vessels  in  the  other  group  which  did  not  pass,  however  the 
smallest  value  was  generated  by  the  largest  sampla. 

It  is  concluded  that  this  developed  distribution  was 
an  acceptable  simulation  tool  for  the  determination  of 
bundle  inter-preparation  times.  The  variable  names 
AE. 1UNDLE. INTER. ARRIVAL,  AFS. 1 UNDLE. INTER . ARRIVAL, 

AOR. 1UNDLS. INTER. ARRIVAL,    MSO. 1 UNDLE . INTER . ARRI7AL ,     and 
AF. 1UNDLE. INTER. ARRIVAL  apply  in  the  simulation. 

7 •   Mail  Tia e  per  Bundle 

The  inter- arrival  time  distribution  for  bundles  sent 
by   local   vessels   to   NSC   Oakland   was   modeled   as  being 
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influenced  only  by  the  05  Postal  Service  and  as  such  was 
independent  of  both  the  vessel  class  and  the  material 
requirements. 

This  distributiDn  was  tested  using  the  Chi-Square 
goodness  of  fit  test  and  was  found  to  be  exponential  with  a 
mean  of  3*.  836  lays  at  both  the  five  per  cent  and  the  one 
percent  levels  of  signif icance.  It  was  assigned  the 
variable  name  MAIL. TIME  in  the  simulation. 


8 .   Number  of  Requisitions  per  Bundle, 

All  the  following  distributions  developed  and 
implimented  in  the  simulation  are  empirical,  except  as 
noted. 

Five  empirical  distributions,  one  for  each  class, 
were  developed  ,  from  the  data  to  describe  the  number  of 
requisitions  per  bundle.  The  following  table  lists  the 
probabilities  of  falling  in  the  ranges  shown  based  on  those 
distributions  by  ship  class: 
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Table    No^    4._    PROBABILITIES    OF    REQUISITIONS  pgR    BUNDLE 

Class  Number   of   Requisitions 

0-10       11-20    21-30    31-40    41-50  51-60  61-70  71- 

AE  .541       .172       .078       .062       .030  .035  .025  .029 

AFS  .692       .126      .036       .032       .019  .012  .003  .024 

AOR  .478       .162       .108       .075       .058  .038  .020  .041 

AR  .170       .091       .125       .095       .098  .106  .071  .124 

Number   of   Requisitions 

0-5         6-10       11-15    16-20    21-25  26-30  31-35  36- 

MSO  .591       .203       .076       .025       .017  .030  .000  .034 


Although  ranges  were  used  in  the  above  table,  all 
values  utilized  in  the  simulation  were  converted  to 
integers.  These  parameters  were  modeled  as  random  linear 
empirical  distributions         in        the        simulation.  Their 

identification         is  AS •REQ«PER«BUNDLE, AFS*REQ«PER •BUNDLE, 

AOR«REQ»PER«BUNDLE,  AR* REQ« PE R» 3U NDLE,  and 

MSO*REQ«PER«BUNDLE      respectively. 

9«      Requisition   Priority 

A  probability  distribution  for  material  priorities 
was  determined  by  calculating  the  percent  of  requisitions 
which  were  in  Issue  Group  One  (priority  one  through  three) , 
the  percent  which  were  in  Issue  Group  Two  (priority  four 
through    eight),    and    the   percent    which    were      in      Issue     Group 
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Three  (  priority  nine  through  fifteen) .  It  should  be  noted 
that  the  requisition  priority  was  considered  independent  of 
both  the  individual  ship  and  the  ship  class.  Thus,  only  one 
distribution  was  developed  for  all  vessels.  This  approach 
can  be  considered  appropriate  since  all  of  these  particular 
vessels  operate  under  the  same  priority  determination 
criteria.   It  was  developed  from  the  data  as  follows: 

The  issue  Group  One,  requisitions  of  priorities  1 
through  3,  were  tabulated  and  only  72  out  of  94,434  cases 
occurred.  It  was  therefore  very  unlikely  that  an  Issue 
Group  One  event  would  be  observed.  In  fact,  this  event 
would  be  realized  only  .33  of  one  per  cent  of  the  time. 

Issue  3roup  Two,  priorities  4  through  8, 
requisitions  were  found  to  be  more  prevalent,  being  14,157, 
and  their  probability  of  occurrence  was  computed  to  be 
.1499. 

Issue  Sroup  Three,  priorities  9  through  15,  had  the 
highest  observed  incidence  with  a  probability  of  .8493. 

The  simulation  variable  for  this  parameter  is 
REQ«PRIORITY. 

10.   Process  Times_ 

The  requisition  process  time  was  modeled  as  being 
dependent  on  only  th=  priority  (Issue  Group)  of  the 
requisition.  This  approach  was  considered  reasonable 
because  different  Issue  Groups  are  actually  processed 
differently.  The  various  picking  documents  for  the  material 
are  expedited  to  the  warehouse  and  are  colored  differently 
for  high  priority  material  (Issue  Group  One  and  Two). 
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The    following   distributions  were   developed   by 

subtracting  the  date  of  document  receipt  at  NSC  Oakland  from 

the   date   that   the   material  was  ready  for  shipment  in  the 
data  base. 

The  Issue  GrDup  One  requisition  process  time 
cumulative  distribution  was  determined  to  be  between  0.0  and 
1.95  with  probability  .394,  between  1.96  and  7.77  days  with 
probability  .423,  and  between  7.8  and  29  days  with 
probability  .183.  It  should  be  further  noted  that  the 
number  of  usable  data  points  was  less  than  72  for  the 
following  reasons;  (1)  the  original  number  of  data  points  in 
this  Issue  Group  was  only  72,  (2)  entries  in  the  data  base 
were  discovered  which  showed  that  certain  requisitions  had 
been  shipped  prior  to  receipt  of  the  requisition,  (3)  other 
date  errors  occurred;  for  example,  several  requisitions 
showed  that  over  300  days  were  used  in  the  processing  time. 
These  types  of  errors  also  occurred  in  the  other  Issue  Group 
data  bases  and  were  also  ignored  in  the  distribution 
computations. 

The  Issue  Group  Two  process  time  cumulative 
distribution  was  also  between  zero  and  1.2  days  with 
probability  .5,  between  1.3  and  14.3  days  with  probability 
.42,  and  between  14.4  and  38  days  with  a  .08  probability. 

The  process  time  for  Issue  Group  Three  requisitions 
was  between  zero  and  1.2  days  with  probability  .56,  between 
1.2  and  15.5  days  with  probability  .395,  and  between  15.5 
and  38  days  with  probability  .045. 

11.   £uantitv  p_er  Re_g_i  is  it  ion 

Since  requisitions  for  material  may  be  a  request  for 
more  than  one  of  an  item  ,  the  appropriate  field  in  the  data 
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base  was  utilized  to  evaluate  the  process.  It  was  assumed 
that  the  various  quantities  ordered  per  reguistion  would  be 
dependent  on  the  vessel  class.  Thus,  five  cumulative 
distributions  were  developed. 

Those  quantities  expected  for  an  AE  class  vessel 
were  found  to  be  between  one  and  five  with  probability  .608, 
between  six  and  ten  with  probability  .238,  and  between  11 
and  160  with  a  .154  probability. 

The  other  vessel  class  distributions  were  modeled 
with  the  same  uniform  ranges  but  differing  probabilities. 
In  the  AFS  class,  the  probabilities  are  .576,  .171,  and 
.253  respectively.  The  probabilities  for  the  AOR  class  are 
.612,  .161,  and  .227;  for  the  MSO  class  .559,  .143,  and 
.298;  and,  for  the  AR  class  .496,  .164,  and  .340 
respecti  vely . 

12.   Weight  p_er  Requisition 

That  data  required  for  the  parameter  determination 
of  this  attribute  was  not  available.  However  the  author 
assumed.  a  classical  exponential  distribution  with  an 
expected  value  of  two  pounds  per  each  item.  The  mean  weight 
per  requisition  generated  by  this  simulation  was  193  pounds. 
Hernandez  and  Gallitz  [3]  stated  that  28,586,168  pounds 
(fiscal  year  1975),  and  26,805,662  pounds  (fiscal  year  1976) 
of  material  were  delivered  by  the  BALD  system.  This  equates 
to  an  average  of  73  pounds  per  reguistion  and  69  pounds  per 
reguisition  respectively  (assuming  that  there  was  not  a 
significent  change  in  the  total  number  of  requisitions  per 
year  from  1978) .  Observitions  by  this  author  at  the  BALD 
shipping  and  delivery  points  revealed  that  it  was  uncommon 
to  witness  a  full  truck  load  shipped.  In  fact  most 
shipments  were  only  one  pallet  level  high,  yet  statistically 


42 


full  truckload  weights  were  recorded  on  the  shipment 
records.  Because  of  this,  it  was  suspected  that  the  weights 
[12]  are  overstated. 

It  is  therefore  concluded  that  the  parameter  of  two 
pounds  chosen  for  the  m=an  of  the  distribution  was  too 
large.  Thus,  the  actual  number  of  shipments  made  was 
selected  at  a  proxy  measure  of  effectiveness  for  this 
variable.  Resultant  outputs  from  this  assumption  have  not 
been  included  in  the  results  section  of  this  thesis. 
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III.   SIMULATION 


A.   GENERAL 


SIMSCRIPT  II. 5  is  a  language  particularly  suited  to 
discrete-event  step  simulations.  It  has  been  designed  to 
facilitate  the  simulation  of  large  complex  systems  with  a 
minimum  of  effort  in  programming,  designing,  and  testing  the 
model. 

It  is  not  the   intent  of   this   paper   to   discuss   the 

details   of   this   unique  programming   language,  and  anyone 

desiring  to  examine  it  in  depth  should  refer  to  raferences  9 
and  13  . 


3.   PROGRAM  DESCRIPTION 


The  modeling  of  that  segment  of  the  BALD  system  impacted 
by  the  random  movement  of  vessels  between  various  ports  was 
developed  by  considering  two  major  series  of  events. 

First,  the  vessel  movements  were  modeled  using  the 
previously  discussed  parameters  and  techniques.  This  series 
of  events  deals  primarily  with  vessel  movement  impacts  on 
the  ultimate  destination  of  shipped  material.  This  series 
also  rsmoves  material  from  a  "old"  shipping  queue  and 
relocates  the  material  in  the  appropriate  "new"  shipping 
queue  corresponding  to  the  vessel's  nsw  location. 
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The  remaining  series  of  events  recreates  the  material 
processing  involved.  Their  logical  functional  order 
commences  with  the  preparation  of  a  group  of  material 
reguirements.  Next,  this  group  of  material  reguirements 
arrives  at  NSC  Oakland  and  is  reduced  to  its  individual 
material  reguests.  These  requisitions  then  are  scheduled 
through  the  material  processing  system  and  a  shipment 
availability  time  is  determined.  The  final  events  collect 
statistics  and  determine  the  freguency  and  the  destination 
of  the  various  shipments. 


1 .   Detailed  Analysis 


The  preamble  defines  various  system  variables, 
events,  and  entities.  Actual  execution  commences  with  the 
main  program.  It  first  assigns  user  defined  values  to  the 
permanent  entities  (ships).  This  segment  then  reads  all  the 
program  decision  variable  distributions,  schedules  an 
initial  port  change  and  bundle  preparation  for  each  vessel, 
schedules  the  initial  shipments  to  each  port,  and  schedules 
the  two  one-time  events,  3 top. simulation  and  Equilibrium. 

From  this  tine  on  the  SIMSCRIPT  event  step 
simulation  time  scheduling  routine  takes  over.  Events  will 
occur  as  determined  by  the  scheduling  parameters  throughout 
the  program.   The  specific  events  are  detailed  below. 

Bndle. preparation:  This  event  schedules  the  next 
bundle  preparation  for  each  vessel  based  on  the  -Lass  of  the 
vessel.  It  then  determines  the  the  valie  of  the 
number. of .requisitions  (bundle)  and  then  schedules  an  arrival 
time  at  NSC  Oakland- 
Arrival,  of  .bundle:  The  temporary  entities, 
requisitions,   are  created  in  this  event.   They  are  assigned 
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all  their   attributes   (priority,   quantity,   and   customer) 
based   on   the   previously   discussed   parameters.    Then   a 
Ready .for .shipment   event   is   scheduled    based    on    the 
requisition's   priority.    Finally,   the   temporary   entity 
bundle  is  destroyad  to  release  memory  space  in  the  computer. 

Change. location:  The  vessel's  new  location  is 
determined  based  on  ship  class  markov  chains.  Statistics 
are  accumulated  to  record  both  the  number  of  location 
changes  per  vessel  and  per  vessel  class.  At  this  time,  if 
this  vessel  has  any  material  in  one  of  the  poet  shipping 
queues,  it  is  removed  and  put  in  the  newly  determined  port 
shipping  queue.  The  system  statistics  are  also 
appropriately  adjusted.  Finally,  the  next  port  change  for 
this  vessel  is  scheduled  based  on  the  vessels  current 
location. 

Ready,  for .  shipmei  t :  The  shipping  location  is  first 
determined,  and  the  requisition  is  filed  in  the  appropriate 
shipping  gueue.  This  event  also  may  schedule  an  immediate 
shipment  of  matarial  depending  on  the  decision  rules 
involved . 

Shipment. to:   This  event  computes   the   majority   of  % 
the   statistics.    It   also   contains   all  decision  rules  on 
shipping  stratagy.   Upon  completion  of  this  event   the   next 
shipment  to  is  scheduled  for  this  port. 

2 .   Seed s 

Since  the  pseudo  random  number  generator  was  seed 
dependent,  ten  seeds  were  initially  selected  and  program 
runs  were  made  to  identify  equilibrium  conditions  and 
reverify  the  simulation's  validity.  The  seeds  ware  selected 
at   least  BOO, 000   numbers  apart  to  preclude  overlapping  of 
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the    number   stream. 

In  order  to  to  evaluate  the  stability  of  the 
measures  of  effectiveness  as  related  to  seed  changes,  Ten 
runs  (one  run  per  seed)  were  made  with  each  decision  rule. 
It  was  noted  that  in  some  instances  the  SIMSCRIPT  program 
exceeded  the  430,000  bytes  allocated  .  Since  the  variations 
in  the  measures  of  effectiveness  (average  wait  time  and  the 
number  of  shipments)  were  minimal,  it  was  not  considered 
necessary   to   rerun    these   programs,    see    Appendix    H. 

3-       Equilibrium    Determination 

The  equilibrium  oc  steady-state  of  the  system  is 
defined  as  a  condition  of  regularity  of  stability  in  which 
opposing  influences  are  balanced.  Thus,  it  is  assumed  that 
for  this  model  there  is  a  limiting  probability  distribution 
of  the  responses  that  is  charactertistic  of  the  system. 
This  state  was  determined  by  a  method  stated  by  Conway[5]. 
Specifically,  the  series  of  measurements  were  truncated 
until  the  first  of  the  series  was  neither  the  maximum  nor 
the    minimum    of   the    remaining    set. 

The  number  of  requisitions  shipped  to  each  port  was 
one  of  the  measurements  evaluated  in  the  above  manner.  The 
determining  port  was  tf.A.S.  Alameda  and  the  time  to 
steady-state  was  two  weeks.  Inadvertently,  the  number  of 
shipment's  variable  was  not  adjusted  for  this  two  week 
period  and  a  lack  of  time  precluded  the  rerunning  of  this 
computer  simulation.  Thus,  this  measure  of  effectiveness 
was    accumulated  over    a    fifty-four   week    interval. 

A  determination  of  the  equilibrium  condition  for  the 
ship      movements      was      not      made.  The        initial        starting 

conditions      for   the   simulation  were   chosen    so  that    they   were 
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typical  of  the  steady-stite  condition.  For  example,  all 
vessels  were  initially  located  at  factual  locations,  rather 
than  positioning  them  arbitrarily  and  then  determining  the 
steady-state  condition. 

**•   Shipping  Strategies 

Four  shipping  flecision  rules  were  analysed  as 
follows:  a.  CASE  I  -  all  material  ready  for  shipment  is 
shipped  daily;  b.  CASE  II  -  all  material  ready  for  shipment 
is  shipped  weekly;  c.  C&53  III  -  in  addition  to  CASE  II 
actions.  Issue  Group  1  miterial  (with  all  other  destined  for 
the  same  location)  is  shipped  immediately;  d.  CASE  IV  -  in 
addition  to  the  CASE  III  decision  rules,  Issue  Group  2 
material  (again  with  all  other  material  in  the  appropriate 
queue)  is  shipped  once  a  day. 

Appendices  E,  F,  and  G  contain  those  events  which 
were  modified  for  each  daoision  rule. 

5.   Measures  of  Effectiveness 

Two  measures  of  effectiveness  were  selected.  First, 
the  amount  of  time  requisitions  were  waiting  to  be  shipped 
was  chosed  as  a  measure  of  customer  service.  Second,  the 
actual  number  of  shipments  released  was  selected  as  an 
evaluation  of  the  cost  of  the  chosen  stratagy.  The  total 
number  of  shipments  is  considered  a  proxy  variable  for 
shipping  costs. 


C.   RESULTS 
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The  outputs  from  the  forty  -program  runs  have  been 
tabulated  by  each  decision  rule  and  are  presented  in 
Appendix  H.  The  logically  expected  results  in  the  mean 
waiting  times  was  observed.  Mean  waiting  times  of  .48  to 
.53  were  observed  when  shipments  were  daily.  Under  weekly 
shipping  rules  the  mean  waiting  times  were  3.41  to  3.61 
days. 

Since  program  runs  were  seed  dependent  and  a  comparison 
of  decision  rules  was  desired,  only  those  runs  in  which  all 
results  were  obtained  for  all  cases  will  be  examined  here. 
These  runs  were  numbers  2,  3,  5,  6,  and  8  as  found  in 
Appendix  H.  Data  fron  these  runs  were  then  averaged  by 
Issue  Group  within  each  decision  rule  (case) .  Weighted 
averages  were  then  computed  per  case  by  assigning  weights 
which  were  representative  of  each  Issue  Group's  probability 
of  occurrance.  The  values  used  were  .0008  (Issue  Group 
One),  .1499  (Issue  Group  Two),  and,  .8493  (Issue  Group 
Three) .  The  results  of  these  computations  represent  five 
years  worth  of  simulation  per  case  and  are  presented  in 
Table  5. 
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I  able    NDj.    5_.    AVESAgED    RESULTS 


CASE 


II 


III 


IV 


ISSUE 

MEAN 

STD 

MAX 

MIN 

TOTAL 

GROUP 

TIME 

DEV 

TIME 

TIME 

TRIPS 

1 

.  49 

.  29 

.99 

.01 

2 

.50 

.29 

1.00 

.00 

3 

.  50 

.29 

1.00 

.00 

2076 

Ave 

.  50 

.  29 

1.00 

.00 

1 

3.  48 

1  .39 

6.92 

.  14 

2 

3.  52 

2.01 

7.00 

,00 

3 

3.  51 

2.02 

7.00 

.00 

319 

Ave 

3.  51 

2.02 

7.00 

.00 

1 

.  00 

.00 

.00 

.00 

2 

2.93 

1  .  99 

7.00 

.00 

3 

2.  91 

1.  99 

7.00 

.00 

337 

Ave 

2.91 

1  .99 

7.00 

.00 

1 

.00 

.00 

.00 

.00 

2 

.  49 

.  29 

1.00 

.00 

3 

.  52 

.38 

6.93 

.  00 

1353 

Ave 

.  52 

.37 

6.04 

.00 
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IV.   DISCUSSION  AND  CONCLUSIONS 


A.   DISCUSSION 


It  is  noteworthy  that  minor  variations  in  the  average 
waiting  times  have  significant  impact  in  the  total  number  of 
shipments.  Increasing  the  waiting  time  per  shipment  from  .5 
to  3.5  days  has  the  effect  of  reducing  the  number  of 
shipments  from  an  average  of  2076  to  an  average  of  319  trips 
per  fifty-four  weeks.   or  a  6.6-fold  decrease. 

However,  adjusting  the  weekly  shipments  by  shipping 
Issue  Group  One  material  immediately  (CASS  III)  reduced 
their  waiting  times  to  zero,  yet  did  not  significantly 
increase  the  total  number  of  shipments  experienced.  In 
fact,  they  only  increased  from  3  19  to  387  per  54  weeks. 
This  is  not  an  unexpected  result  since  there  was  only  a  .08 
per  cent  chance  of  a  vessel  generating  an  Issue  Group  One 
shipping  requirement. 

Finally,  CASE  IV  decision  parameters  resulted  in  almost 
the  same  number  of  shipments  as  when  daily  shipments  were 
made.  The  average  number  observed  for  54  weeks  wis  18  53,  on 
the  average  only  263  shipments  less  per  year. 

The  weighted  averages  of  each  case  were  used  to 
construct  Figure  10.  The  dependent  variable  wis  the  mean 
wait  time  in  days  and  the  independent  variable  was  the 
number  of  shipments  made  in  fifty-four  weeks.  The  curve  was 
constructed   assuming   that    the   unknown   function    was 
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"hyperbolically"  shaped.  This  assumption  was  supported  by 
the  observation  that  as  the  number  of  shipments  approach 
infinity  the  average  waiting  time  would  be  expected  to 
become  zero,  and  as  the  number  of  shipments  approach  zero 
the  average  waiting  tine  would  be  expected  to  become 
infinite . 
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Figure    10    -      SHIPMENTS    VS    WAITING    TIME 
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The  curve  of  Figure  10  provides  a  practical  tool  for  a 
decision  maker.  If  an  objective  function  is  known  (such  as 
a  decision  maker's  relationship  between  the  relative 
importance  of  waiting  times  and  the  number  of  shipments)  , 
the  "optimum"  number  of  shipments  could  be  determined.  For 
example,  if  it  was  decided  that  the  number  of  shipments  was 
twice  as  important  as  waiting  times,  an  objective  function 
could  be  constructed  as  follows:  total  cost  =  (cost 
constant)  x  (waiting  tima)  +  (cost  constant)  x  (2)  x  (number 
of  shipments) .  The  appropriate  cost  constants  would  have  to 
be  selected  to  convert  the  variables  to  dollars.  This 
objective  function  could  then  be  used  with  the  curve  to 
determine  an  "optimal"  solution.  However,  this  solution 
should  not  be  attempted  until  additional  simulations  are  run 
to  verify  the  midrange  of  the  curve. 


3.   CONCLUSIONS 


In  view  of  the  simulation  results,  it  would  appear  that 
actual  modification  of  the  current  shipping  parameters  may 
yield  substantial  transportation  savings.  However,  because 
such  parameters  as  the  weight  and  volume  of  the  larger 
shipments  were  not  evaluated,  delaying  a  shipment  beyond  the 
time  when  a  full  truck  load  is  ready  for  shipping  would  not 
be  expected  to  result  in  any  savings. 

It  is  recommended  that  follow-on  modeling  in  this  area 
be  conducted.  The  weight  and  volume  parameters  should  be 
identified  and  decision  rules  should  be  modified  to  include 
maximum  and  or  minimum  weight/volume  shipping  restrictions. 
Additional  shipping  strategies  (cases)  also  need  to  be 
proposed  and  analyzed  (for  example,  allow  Issue  Group  II's 
to  be  shipped  every  other  day,  every   third   day,   etc.)   to 
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fill  in  the  middle  of  the  curve  of  Figure  10.  Finally,  the 
simplifing  assumptions  of  the  model  presented  in  this  paper 
need  to  be  critically  reviewed  and  any  which  seriously 
violate  reality  should  be  replaced  by  more  realistic  ones 
and  the  analysis  repeated. 
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APPENDIX  A 


SHIPS  INFORMATION  BULLETIN 


NAVSUPPACT-3Q     SHIPS  INFORMATION  -  7LS-babl         SUNRISE  SUNSET 

0=100  UNIFORM  PORT  SERVICES  OFFICE  iaQS3GU  iaia43U 

13-24  APR  73         NAVAL  SUPPORT  ACTIVITY  n0S2=!U  11iai!fiU 

{TUE-MON*  TREASURE  ISLAND  20QSE3U  S0164TU 

SAN  FRANCISCO-.  CALIFORNIA  =14130        ElOSEbU  S113S0U 

AREA  CODE  415  UNLESS  OTHERWISE  INDICATED   E20S2SU  2E1351U 

E30SE4U  2313SEU 

E40SS2U  S413S3U 

SOPA  SFRAN-,  COMSERVGRU  ONE-.  CAPT  E.J.  MESSERE-.  USN 

SOPA  SUBAREA  SOUTH-,  COMSERVGRU  ONE-,  CAPT  E-J.  MESSERE-,  USN 

SOPA  SUBAREA  NORTH-,  COilSERVRON  THREE-,  CAPT  C  •  Id  •  O'REILLY-,  USN 

COMCARGRU  THREE  -  3^=1-2131 
COMSCPAC  -  4bL,-b31b 
COMSERVGRU  ONE  -  4bb-5312 
•  COMSERVRON  THREE  -  70?-L,4fc.-3S3a 

SHIPS  PRESENT  SAN  FRANCISCO  BAY  AREA 

SHIP  HULL  BERTH  PHONE 

iLTfiD  T-AK-277  NSC  4bL,-5c!S0 

BROSTROM  T-AK-2S5  NSC  v/      /  4tb-S710 

CARPENTER,.  .  DD-3S5  NAS-*^    /AV/7T-  <*^  8b=i-3037 

C0QK£rc  y/?/?f        FF-ioa3      triple  a  shpyd  3S2-2120 

EXCEL                     ..    .  MS0-43=i  TODDS    SHPYD    ALAMEDA  523-0321 

FANNING  BfZ.  */iihf  FF-107b  TRIPLE    A    SHPYD  a22-23b0 

FLINT  '  AE-3E  N A S  -  £r#  */& V-  ci/f^sr*  flbi-37bb 

GALLANT  £.rt,5filJ7t  f1S0-43=l  PACIFIC    DRYDOCK  a^3-!C^E 

HADDOCK  ere  **/'3-/7f  SSN-bSl  MINSY  707-b4b-4370 

HALEAKALA  AE-ES  UPNSTA  b71-5004 

HECTOR  AR-7  NAS  6^-3^70 

HEPBURN  £rc+  y/^/7  fFF-1055  TRIPLE    A    SHPYD.            _  332-3711 

KANSAS    CITY              '  AOR-3  NAS  -  5 /"^  %3  y/>f'J>  ab=l-202Q 

KISKA  AE-3S  NAS-  Sro  V39/?r-  S*<r~  3b=i-3b5a 

MAUNA    KEA  AE-22  TODDS    SHPYD    ALAMEDA  S23-0321 

MOUNT    HOOD  AE-2T  NAS  8b=i-4722 

MYER  T-ARC-b  NSC  4bb-5001 

PERMIT  SSN-S=iS  MINSY  707-b4b-32b4 

ROBERT    E.    LEE^r-f^A/SSBN-bQl  MINSY  ?07-b4b-3432 

SEAIdOLF                             /  SSN-S7S  MINSY  707-b4b-41cJ7 

SHASTA  AE-33  TODDS    SHPYD    ALAMEDA  3bS-044S 

TAUTOG  SSN-b3=i  MINSY  7Q7-b4b-4150 

VANGUARD  T-AFM-l=i  NSC  4bb-b3=ia 

UABAZH&rc  Y'f/??  AOR-S  TODDS    SHPYD    ALAMEDA  523-0321 
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APPENDIX  B 


FORTRAN  PROGRAM  ANG  DATA 


//AN 
//  E 
//FP 


10 
100 


20 


22 


24 


26 


23 


30 


32 


34 


36 


GSDA 

XEC 
RT  .S 
IN 
DA 
OT 
RE 
FQ 
IN 
IF 
IN 
I«= 
IU 
WR 
IF 

.IC 
IF 
IU 
UR 
IF 

.  IC 
IF 
IU 
WR 
IF 

.IC 
IF 
IU 
WR 
TF 

.IC 
IF 
IU 
WR 
IF 

.IC 
IF 
IU 
WR 
IF 

.IC 
IF 
IU 
WR 
IF 

.IC 
IF 
IU 
WR 
IF 

.  IC 
IF 
IU 
WR 
IF 

.IC 
IF 
IU 
wR 


TA  J 

Foot 

YSIN 

TEGF 

TA  I 

MENS 

A0(1 

RMAT 

Rl  = 

(ICL 

R2  = 

(IUI 

CI  = 

ITE( 

(INP 

LJS 

(IUI 

IC  = 

ITE( 

(INR. 

LUS 

(IUI 

IC  = 

ITE< 

(  INR 

LUS 

(IUI 

IC  = 

ITF( 

(  INF 

LUS 

(IUI 

IC  = 

ITE( 

(  INR 

LUS 

(IUI 

IC  = 

ITE< 

(INP 

LUS 

(IUI 

IC  = 

ITEI 

(INP 

LUS 

(IUI 

IC  = 

ITE( 

(INR 

LUS 

(IUI 

IC  = 

ITF( 

(INP 

LUS 

(IUI 

IC  = 

ITE( 


C8  (2427, 0331, RZ 

CLG 

00  * 
R*2  ISTATfT3A 

BA/*BA*/9  IN<U/0 

ION  CATA1(10),QA 
0,  100, END  =  999 ) 
CCA4,2A2,1  244,  I 

INP1    +     I 
US    .NE.10    .OR.     I 

INR 2    +    1 
C     .NE.    13)    GO    T0 

101 
20,  lOOJOATAl,!  ST 
2.LE.1000)WRIT=( 

C  .NE.  29)  GO  m 

102 
20,  ICO) DATA!  , 1ST 
2.LE.1000)Wo ITF( 

C  .NE.  37)  GO  T" 

103 
20,100) DATA1 , I  ST 
2.LE.  lOOO)WRITc{ 

C    .NE.     78)    GO    TO 

1C4 
2Q,100nATAL  ,  1ST 
2.LE.1000) w* ITE( 


81)  ,'EAT=2  740',TI^C=75 


/,  INR2/0/ 

TA2(  13) 
DATA1,ISTAT,D4T 

3,T3  ,12) 

STfiT  .NE.   IP  A)   G 

20 

*TfDATA2,IUIC, II 

30,  1C0)QA7A1, 1ST 

22 

AT,0ATA2  ,T'iir,  t  t 
30, 100)OATA1,I ST 

24 

4T, DAT A?, IUIC, II 
30,  1C0)DATA1  ,ist 

ATf 0ATA2, IUIC, I T 
30,100)CATU  ,IST 


A2, IUIC, II, ICL  I 

J    TO    10 


,ICLUS 

AT, DATA  2, IU 


,  ICL'JS 

AT,PATA2,I 


,  ICL'JS 
AT,0ATA2  ,  IU 


,  ICLUS 
AT,0ATA2, IUIC, I 


C     .NE.    25)    GO    TO    28 

105 

20,  100JCATA1, 1ST 

2.LE.1000)W»TTC( 

C     .NE.     24)     GO    T^ 

106 
20, ICO  )0ATA1 , TST 

2.LE.1000)W= Itc( 

C    .NE.    15)    GO    TO 

1C7 
20,  100)0ATA1,T  ST 
2.LE.1000)WRITE( 

C     .NE.    23)    GO    TO 

1  C8 
20,  1CC)DATA1,TST 

2.LE.1000)WR ITE( 

C     .NE.    9)    GO    to 

2C9 
20, ICC )0ATA1 , I  ST 
2.LE.10CO)W  !Tr( 


C     .NE.     3)    Gn    TO 

210 
2C,100)PAT£1  ,1  ST 


AT, 0ATA2, IUIC, T I 
30,  lOOHA^il  ,1  ST 

30 

ACQATA2, IUIC, I ! 
30,100)DATA' ,IST 

32 

AT,  PATA2,  I'1TC  ,  I  I 
30,100)0ATA1 , 1ST 

34 

AT,  DATA  2,  IUI  CI  I 
30, 100)DATA1, ! ST 

36 

ST,  0  AT  A2,  IUI  CI  I 

30,  lCO)nATAl,T  ST 

39 


,  ICLUS 
A7,0ATA2  tllJ 


,  ICLUS 
AT,DATA2,  I  J 


,  I  C  L  U  S 

AT,DATA?,IJ 


,  ICL'JS 

AT, DATA  2, T  ) 


,IC LUS 

AT, DATA  2, 1 J 


IC  I  I 


t  r 


,  I  I 


AT,qatA2,I  JIC, T I  ,  ICLUS 
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IF(INR2.LE.1000)W?TT=(30,  100)0AXA1,  T  S^  AT  ,  DAT  4  2 , !  JT  C  T' 
. ICLUS 
38  IFdUIC     .NE.     14)    GO    TQ    40 

I'JIC    =    211 

WR  ITE<  20,  100)  0ATA1  ,1  S^C0AT^2,  I'JIC  I  I  ,ICLUS 

IF( INR2.LE.1000)WR TT=(3C, ICO) DATA  I, 1ST AT , DATA  2, IUIC ,1  T 
.ICLUS 
40  IFdUIC     .NE.    21)    GG    T0    42 

I'JIC    =    312 

WRITE(  JClOCinA^1  ,1  ST  AT,  DAT  42, 1  Ml  CI  I  ,  ICLUS 

IFdNR2.LE.1000)*°ITE(30,100)DAT41tISTAT,0AT4  2,TUTrtIT 
•ICLUS 
42  IFUUIC     .NE.     19)    GO    Tn    44 

IUIC    =    313 

WRITE<  2C,lC0)D4TACTSTaT,DATA2,rJ!C  !  I  ♦  ICLUS 

IF(INP2.LE.1000)U? I  TEC 30, ICO) DATA  1,1  ST  AT  ,  DATA  2  , 1 J  I C , ! T 
.ICLUS 
44  IFdUIC     .NE.    11)    GO    TO    46 

IUIC    =    314 

WRI TE( 20, 100) DATA  1,1 ST AT ,DATA2, IUIC, II , ICLUS 

IFdNP2.LE.10G0)WRITP<  30  ,  1  CO  )  DA  ta  1  t  I  ST  AT  ,  DATA  2  , T  U  I  r  , T  T 
.ICLUS 
46  IFdUIC    .NE.     46)    GC    TG    4^ 

IUIC    =    415 

WR  IT E ( 20,  100) D4TA1  , I  STAT, DAT A2, IUIC I  I  , ICLUS 

IFdNF  2.LE.1000)  WQ  I  T=(  30,100)^.^1, 1ST  AT,DATA2,  I'JIC  I  I 
.ICLUS 
48  IFdUIC    .NE.    45)    GG    TO    50 

IUIC    =    416 

WRITE  (20,  100)04TAldST4C0ATA?,THTC  II  ,  ICLUS 

IF(INR2.LE.1000)W5ITE  (30,1  00)  DATA"*  ,  I  ST  AT  ,  DAT  A  ?  ,  I  J  I  r,  t  j 

.ICLUS 
50  IFUUIC    .NE.    5  J    GO    TQ    10 

IUIC    =    517 

W  ITE( 20,  100  )  DATA  1, I  ST  at , qaTA 2, I U IC  T  I,  I  CLUS 

IF(INF2.LE.1000)WRITE(30,100)OATA1, T S^ AT , DAT  A  2 , IJ I r  ,  'T 
.  ICLUS 

GO    TC    10 
999  WRITE(6»200)INR1,INR2 

200  FORMAT ( IX,  'TOTAL    RECORDS    =    ' , I  7, 10X , « TOTAL    8A    RECORDS 

.=    »,  17) 

END    FILE    2  0 

END    FILE    30 

STOP 

END 
//G0.FT10F001    CC    UN d  =  3400- 3 ,VPL=SEF =^DS 707, DI SP= ( OLD,*E=P ) , 
//    LABEL  =  d,SL,,IN)  ,  DSN  =  S2  3  90  .LOC.  DLV  .  SORT  ED  .U  I  r  .v 
//GO .FT20F0C1    DO    DSN=S2427.L0C. SHI  P. BA» V0L=SER=NPS7 15 , 
//       DISP  =  (OLCKEEP), 

//    UNIT  =  3400-3,LA3EL=d  ,  SL,  ,OUT)  ,DC8  =  ( RECFM  =  FB,  LRECL  =  ?.30 ,  ) 
//,BLKSIZF=800C) 

//G0.FT30F0C1    CC    DSN=S2427  .LOC .SHI P .BA, LABEL =EXPHT=79365, 
//    SPACE  =  ( 20  CO, 155, 5) ) , VOLUME  =  S ER=OUF FY , D I  3 P  =  ( OLD, K EED)  , 
//UNIT=2314 
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APPENDIX    C 


FORTRAN    PROGRAM    ANG    DAT1 


THE 

FOR 

THE 

//AN 

//    E 

//FQ 


10 


100 

c 

c 


c 
c 


20 


21 
22 


13 

24 


FOLLOWING    PROGRAM    EXTRACTS    that    DATA    NPCESS4DY 
THE    DETFRM INAT ION    HP    THC    matpptal    PARAMPTFRS    OP 
SIMULATION. 

GSCAT1    JOB    (2427, 0331, PZ81) ,  'EXT=2740' ,TIV^  =  60 
XEC    FOPTCLG 
RT.SYSIN    DD    * 
REAL*S    UICLCC 

DIMENSION    NUMB (367,1 8) ,     TQUA'-!(  500  , 1  8  5 , MA T LT { 5  00  )  . 
.»IGR0UP(4),UICLGC(  13) ,NN( 1 7) ,PGROUP( 4)  ,MA PR  I ( 500* 3 ) 
.IPROC(500,4) 

CATA    NUMB /66 06*0/,  TQU^N/90  00^0/  ,^ATLT/  50  0-0/, 
., I  GROUP/ 4*0/  ,IDPT/0/,  II /O/, 12/0/, I  3/0/, 14/0/,' 

•  K/0/,A/l .0/,NN/17*0/ , IFLGl/0/* IFLG2/0/ ,  M  APR  I  /  1500*0/* 
. IPROC/20CC*C/ 
CALL    SETIME 

READd  0,1CC,E^0=',6  )  IOiTPi  ,  IPRI  ,IQN,T0ATE2,  IDATE3*  TUTr 
IF  {  I  PR  I     .EO.     0)    GO    ti     io 
IFdUIC     .EC.    18)IJTr    =    01 

IFIIPRT    .FO.    1003WRITE  (6,100)     I  0  t ,TE  1  ,  I  P°  I  ,  ION  ,  I  OiT  r-2  , 
.I0ATE3,  IUIC 
F0RMATC27X,I3,8X,I2,4X,I5,2X,I3,5X,I3,31X,I2 ) 

IFdDATEl  .GT.  iniTP2)  IV^EZ  =  IQATE2  +  3o5 
IFUDATE2  .GT.  IDATc?)  IDATE3  =  I0ATE3  +  365 
NUMB.  IDATE1,  IUIC)     =    NUMB  (  I  DATC  1*  T'J  IC  )     +    1 


IFUPR  I     .GT.    3)    00    n    20 
IGROUP (1 )    =    I  GROUP ( 1 )     +    1 

11=11+1 

IF(I1     .LE.    500)     IPR0C(T1,1)    =    I^T 
IF  (II     .LE.    50  0)    MAPRI(I1,1)    =    lOATP? 
IFdPPI     .LT.    4    .OR.     IP-1     .GT.     8)    OP 
IGROUP (2)    =     IGROUP (2)     +    1 
IFUFLGl    .LT.    10)     GO    tp    ?1 
IFLG1    =    C 

12  =     12    +    1 

IF { I  2  .LE.  500)  IPR0C(I2,2)  =  IOAT 
IF (12  .LE.  5  00)  MAPOl(T2,2)  =  I0ATE2 
IFLG1  =  IFLG1  +  1 
IF( IPR  I  .LT.  9)  GO  rn    24 
IGROUP (3)  =  IGR0UP(3)  +  1 
IF(IFLG2  .LT.  90)  GO  to  23 
IFLG2  =  0 

13  =  13  +  1 

IF(I3    .LE.     500)     IPR0C(I3,3)     = 
I'M  13    .LE.     5  00)    MAORI  (13,3)    =    IQATE2 
IFLG2    =    IFLG2    +    1 
CONTINUE 

NN  (IUIC)     =    NN( IUIC  )     +    1 
K    =NM  IUTC) 
IF(K    .LE.     500)     IQ'JAN(K*  IL'IC)     =IQN 


C0UNT1    =    C0LNT1    +1.0 

IF (COUNT  1/13 0.0    .M  =  .     &)    CO    to     io 

A    =    A    +     1 

14    =    FIX(A) 


E3    — 

-    10 
Tn    2  2 


"5       — 

-    I  0 


I0ATr2 
ATF* 


IOAT=? 
ATE1 


t  c;      _ 


0ATE3 


-    in 


I0ATE2 
H:l 


59 


26 


1111 


IF ( A     .LE 

GO    TO     10 
CONTINUE 

igroup(I)   =  r 

CALL  GETI^E(  I^T) 
SECS  =  IET*  C. 000026 
WRITE  (6,1111)  SrCS 
FORMAT (P16.12) 
IGR0UP(4)  =IGR0UP(1) 


500)  MAILT(T4)  =  I0ATE2  -  IDiTEl 


11 
2 


3 
3 

C 
C 

115 

C 

122 

120 

124 

130 
34 
132 
131 
134 

135 

136 
150 

153 

156 
C 


PGROUPt 1) 

PGROUP (2) 

PGRCUPO) 

DO    32    J=l 

DO    23     1=244,365 

IF     (NUMB (I,  J)     .MP 

FORMAT     (213,16) 

CONTINUE 

CO    30    1=1 

IF    (NUM8( 

CONTINUE 

CONTINUE 

END    FILE 


+    Tr,Rn'jp(7j     +    IGonUP{3) 
=    FL0AT{  I  GROUP  <  1)  )  /FLOAT (  I  GROUP  (4)  )  *U0 
=    FL^AT(  IGR0t)P(2)  ) /FLOAT  (  IGR0UP(4)  )*1QC 
=    FLOAT( I  GROUP (3 )  ) /FLHAT< IORQUP (4)  ) *} J  J 
17 


,243 
I,  J  ) 


0)     WRITE    (20, HO)     I  ,  J  ,  NUMB  (  I  ,  J  ) 


•  NE.    0)     WPTTE    (20,110)     I , J,NUMB( I ,J ) 


20 


PRINT    MATRIX    9    COLUMNS 

PEAO(5,U5)UICLOC 

FORMAT (A6  ) 

JENO    =     17 

NEND    =    JEfsO    -    1 


A    TIM! 


CO    34    N 
MEND    = 

WRITE( 
FORMAT {  • 

WRITE(6, 
FORMATd 
WRIT  =  (6, 
kRITE(6, 
WRITE( 6, 
FORMAT  <  ' 
WRITE(6, 
WRITE( 6, 
FORMAT  (I 

.  16, 2X,  16 
CONTINUE 
WRI^E(21 
FORMAT  ( 
WRITE(6, 
FORMAT {/ 
WRITE( 6, 
FORMAT  (I 

.I5,T65,' 
WRITE(6, 
FORMAT (  • 

.MAIL  TIM 
READ(5,1 
WRITE(6, 
FORMAT  (2 
WRITE 
FORMAT  (1 
WRITE( 22 
WRITE(23 
FORMAT ( I 
WRITE( 7, 
FORMAT (2 


=     1, 

N    + 

6,12 

1',  1 

120) 

IX. 9 

130) 

130) 

124) 

1M 

120) 

13C) 

6,2X 

,2X) 

,132 

12,1 

131) 

///) 

134) 

OX,  • 

PERC 

135) 

1*  ,1 

E'// 

15)  ( 

136) 

OX, 3 

(6,1 

2X,  I 

,  132 

,153 

6) 

156) 

0(11 


NEMO, 9 

8 

2) 

5X, 'FREQUENCY    OF    ?EONc    BY     SHI^*//) 
(UICLOC  (N!)  ,NI=N,NIEND) 

( A6V?X)/) 
(MJ, (NUM8(MJ ,NK) ,NK=N,NIENO) ,NJ=244,365) 
(NJ,  (  NUMo  (MJ,,\K)  ,NK=N,NIEMD)  ,NJ  =  1  ,243  ) 

5X, 'CUANT  T-ry    PCR    REOM    PY    SHIP*//) 

(UICLOC(NT ) ,NI=N,NIEND) 

(  N  J  ,  (     I  Q  U  AM  {  N  J  ,  NK  )  ,  N  K=N  ,  N I E  NO  ) , N J=l , 5  0  0) 
,l6,2X,l6,2X,I6,2X,l6,2X,!6,2X,Io,2X,To.2Y 


)  (  (  J,     IQ!MN(  T  ,  J)  ,T=i  ,500)  ,J=1  ,  17  ) 
c) 

(  I  ,  IGROUP(  I  )  ,PGR^'JD(  I  )  ,1=1,3) 

ISSUE    GRnn^>    ',11,*     TO^AL    NR    Oc    REQ:*,T56, 

ENT:« , ?X,F5.2) 

OX,«NSC     I^SUE/SHlo    TIME    BY     IGRP     AND    3EQM 
') 

UICLOC ( I ) , T=l,4) 

(UICLOC( I  },!=!, 4) 
!( 46, 2X) , 10X,A6) 

.50)  (I,  MPROCC  I,JJ,J=1,3)  ,MAILT(!  )  ,1=1,500) 
!  7, 16,2 X , 16 ,2X , 16 , ?X , 1  OX , 1 6  ) 
!)(( J,! OR  DC  (I, J  )  ,  J  =  1,3)  ,1=1,500) 
i)CM4ILT(I  ),I  =  1  ,500) 

UJfMAPRI  (I,  J),I     =     1,500),  J    =     1,3) 


(  (J,MiPPT  (  T,  J  )  ,1     =     1, 500) , J    = 
,13)) 


CALL    GETIME(I=T) 
SECS=    IET    *    0.000026 
(6,1111)     SFCS 


WR  ITS 
STOP 
CEBUG 
END 
//G0.FT10F001    CC 


SUBCHK 

DSN=S2427.LCC 


SHlP.8/\tVnL  =  SE^=NPS71 
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//  DISP 
//  UNIT  = 
//G0.FT2 
//  DSN=S 
//  DCB=( 
//  OISP= 
//GC.FT2 
//  DSN=S 
//  DCB  =  ( 
//  DISP= 
//GG.FT2 
//    DSN=S 

//  oce=( 

//  DISP= 
//GQ.FT2 
//  DSN  =  S 
//  DCB  =  ( 
//  OISP= 
//GO.SVS 


1 
2 

3 
4 
5 

6 

7 
8 


AE 
AE 
AE 
AE 
AE 
AE 
AE 
AE 
AFS 
AFS 
AFS 
AOR 
AQR 
AOR 
MSD 
MSO 
AR    7 
DUMMY 
IGRP     1 
IGRP    2 
IGRP     3 
MAIL 


=(OLD,KEEP) , 

3400-3, LA3EL=( L,SLt , IN) 

OFOOl     DC    LA8EL  =  EX°nT  =  79365,miT  =  23i  4tVQL=SER=DUFFY, 

24  2 7. L .SHIP.BA.BUNOLE.FREQ » 

RECFM=FE,LRCCL=12,  3LKS!ZF=  6000)  ,SD\C=E=  (6000,  (  14,5))  , 

(OLD, KEEP) 

lFOOi    DC    LAPEL==XP0T=79365,UNIT=23I4 , V^L=S CP =0U" c Y , 

2427.L.SHIP.BA.QUAN.PER.REGN, 

RECF^=FE.LRECL=8,BLKS!ZE=6400),SPACE=(6400, (12, 5) ), 

(OLD, KEEP) 

2F001    CC    LAREL  =  EXDD^=79365,UNIT=2314tvnL  =  ^E-=0')FcY, 

24  27.L.SHIP.BA.PO^CcSS.TIMe, 

RECFM=FB,LRECL  =  3,3LKSTZE  =  6400) , SPACE =(  6400, (2,5)  )  , 

(OLD, KEEP) 

3F001    DC    LA8FL=FXP0T=79365,UNIT=23l^ ,VOL=S-R=nuP-Y. 

2427. L. SHI P. B A. MAIL. TIME, 

RECFN=FB,LRECL=6,BLKST  ZE=30  00 ) , S PAC e= { 3000  ,  (1,5  ))  , 

(OL  CKEEP  ) 

IN    DD    * 


9 

10 

11 

!  2 

13 

14 

15 

16 
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APPENDIX    D 


SIMSC3IPT    PROGRAM    ANG    SIM 


PREAMBLE 
t  t 

VERIABLE    DEFINITION    INFORMATION    FOLLOWS 
•  t 

GENERATE    LIST    ROUTINES 
i  t 

THE    NEXT    14    STATEMENTS    DECLARF    THE    ENTIT 

AND    THFIR    ATTRIBUTES 
t  i 

PERMANENT    ENTITIES 

EVERY    SHIP    HAS    A    LOCATION]    ,     a    typ<=     t 
A    T.SHIPPEC,     A    T„ CHANGE       AMD    MAY 
BELONG    TO    A     SHIP.QUrUE 

EVERY    PCRT    CWNS     A    ^HIP.QUCUE    AND    A     S 
ANC    HAS    A    WT. SHIPPED     AND    A    VDL.SHTpo 

A    wT. FINAL. SHIPPED, 
A    VOL.  FINAL.  SHIPPED,     A    TflT.REQ 


IES 


Hiop  ING.QUEU! 
ED, 


TEMPORARY    ENTITIES 

EVERY    BUNDLE    FAS    A    Sn°Cc,     A    NUMBER, Ql 

EVERY    REQUISITION    HAS    AN    (0WNERC1M) 
QUANTITYQ7-32  )  )  , 

A    WEIGHT,     A    VOLUME,    A    TI ME .READY .FOR . SHIP 

AND    MAY    BELONG    tq    a    SHI PPI NG. QUEUE 


'P.R-OUI  SITI  ONS 
,P°I ORITy (7/4)f 


THE  NEXT  STATEMENT  NOTIFIES  THC  CO^PLICD 
EVENT  NOTICES  FOLLOW  RATH^o  THAN  ENTITIC 
i  « 

EVENT  NOTICES  INCLUDE  STOP . SI MULAT! ON  A 
i  i 

THESE  STATEMENTS  ESTA3L!SH  FTVE-WORD  REC 
i  i 

EVERY       BNCLE. PR-PAP A^IDM    HAS     A    Rp *T 

EVERY  APRI VAL.OF.BUNDLc    HAS     A    ITEW 

EVERY  READY. FOR. SHIPMENT    HAS    A    ORDER 

EVERY  CHANGE. LOCATION    HAS    A    TUG 

EVERY  SHIPMENT. Tn    HAS     A    PLACE 
i  * 

THE    NEXT    STATEMENT    IDEN'TFTES    THE    PROCES 

PRIORITIES     IN       THE     PROGRAM 
t  i 

PRIORITY    ORDER     IS       BNDL E . PR E°AP ATI  ON,     AR 

READY. FOR. SHIPMENT,    CHANGE .LOCATION,     SHI 

STOP. SIMULATION 
i  • 

THE    FOLLOWING    LINES    ESTABLISHES     POINTERS 

ALLOWS    THE    SYSTEM    TO    OWN    SETS. 

THE    FOLLOWING    57    LINES    APE     THOSE    SYSTEM 

WHICH    THE    SIMULATION    UTILIZES 
i  i 

THE  SYSTEM  HAS  A  1  .  WA IT . TT m c , t  2.WA^T.TT 
A  SAN. FRAN. SHI  P.  IN^ER. DEPAPT'JP  c  RANDOM 
A  EcTH. STL. SHIP. INT«=o.p5oacT!JO.E  RAND 
A  AE.1UNCLE.  INTE°  .A^?p  I  VAL  RANDOM  S" 
A  AFS.1UNDLE  .  INTCR. APP TV^L  RANDOM  ST 
A  ADR. 1 UNDLE  .  INTE P. ARRIVAL  RANDOM  ^T 
A  VSC.1UNDLE.  INTCR.APRIVAL  RANDOM  S" 
A    AF. LUNDLE. INTER. ARRIVAL    RANDOM    STE 


S 

NO    EQUILIBRIUM 

OR  OS 


SING 


RIVAL. OF. BUNDLE, 
PMENT.TO, 


WHI  OH 
PARA  METERS 


ME,     A    3.WAIT.TIME 
S  x  -  P    VARIABLE, 
pm    ST5°    VAR  I  ABLE, 
P    VARI ABLE, 

EP  VARIABLE, 
FP  VARIABLE, 
FP  VARIABLE 
P    VARIABLE, 
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A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
A 

RA 
ALA 

A 
A 

V 
A 

A 

A 
A 
A 
A 
A 
A 
A 
A 
A 
A 
RA 


AE.ALA 
AE.MAR 
AE  .WEA 
AS. NSC 

AE .SAM 

AE.TOD 
AE.BET 

AE.DEF 
AOR.AL 
AGR.NS 
ACR.TO 
AOP..BE 
AOR.DE 
AFS.AL 
AFS.NS 
ASF. TO 
AFS.TR 
AFS.OE 
AR  .ALA 
AR.MAR 
AR.NSC 
AR  .DEP 
MSQ. AL 
MSO.SA 
MQS.TC 
MSO.T. 
MSO.ME 
fSO.PA 
MSO.DE 
PEO.PP 
NDOM  S 
M. SHI P 
A  OEPL 
AE.REC 
MARE. I 
AP IABL 
AFS.RE 
AOR.RE 
MSO.RE 
AR.REO 
AE  .QUA 
AFS.CU 
AOR.CU 
MSO.QU 
AR.QUA 

1.  ISSU 

2.  ISSU 
3. ISSU 
NDOM  L 


M. 
E. 
P. 
.0 
.F 
0. 
H. 
LQ 
AM 
C. 
DD 
TH 
PL 
AM 
C. 
DD 
IP 
PL 
M. 
E. 
.0 
LC 
AM 
N. 
DD 
I  . 
RR 
CI 
PL 
10 
TE 
.1 
GY 
.P 
SL 
E, 
C. 
0. 

c. 

.P 

N. 

AN 
AN 
AN 
N. 
E. 
E. 
E. 
IN 


GRT 
SL. 
TA. 
K.P 
AN. 
CRT 
TL. 
RA 
POP 
AK. 
POR 
POR 

y  r 

POR 
AK. 
POR 
A.P 

Y  R 
ORT 

SL. 
K.P 

RA 
POR 
RAN 
POR 
GFT 
.PC 
.PG 

Y  R 
ITY 

VA 
TER 
TIM 

R.e 

NO. 


.CHAN 

PO°T. 

PORT. 

GRT.C 

P^RT. 

.CHAM 

PORT. 

NDOM 

T.CHA 

P^RT. 

T.CHA 

T.CHA 

A  NDOM 

T.CHA 

POPT. 

T.CHA 

ORT.C 

ANDO* 

.CHA^ 

POPT. 

ORT.C 

NDOM 
T.CHA 

.onqT 

T.CHA 
.CHAN 
RT.CH 
PT.CH 
ANDO^ 


Gr-    R 

CHAN 

CHAN 

HANG 

CHAN 

GE  P 

CHAN 

STEP 

NGE 

CHAM 

NGE 

NGP 

STE 
NGE 
CHAN 
NGE 
HANG 

STE 
GE  R 
CHAN 
HANG 
<;TC° 
N  G  E 
.CHA 
NOP 
GE  R 
4  NGE 
ANGC 

S^E 


AND*"1 
cf  q 

\j  ~     r 

f  RA 
GF  R 
AN  DO 
GE  R 
VAP 
RAND 
GE  R 
RAND 
RAND 
P  VA 
RAND 
GE  R 
RAND 
E  RA 
P  VA 
ANDO 
GE  R 

E  RA 
VAC 

c  AMn 

MGE 
RAND 

ANDO 
PAN 
RAN 

P  VA 


M  STEP 
ANDnM  S 
A NDOM  S 
NDOM  ST 
A NDOM  S 
M  STEP 
AND^m  S 
I  ABLE, 

Q  K\      £  J  C  D 

AND™  S 
0  M  S  T  =  P 

R I  ABLE, 

QM   S  T  C  p 

ANDQM"  S 
OM  ST=d 
NDOM  ST 
RI ABLE, 
M  STCP 
A  NDOM  ^ 
NDOM  ST 
IA3LC  T 
QM  ST^P 
RANDOM 
q  M  S  T  F  P 
M  STEP 
DOM  STE 
DOM  ST- 
RIABLE, 


VART 

TFD 
T=P 

TEP 
VAPI 

TEP 

VAR 

TED 
VAC 
VAP 

VAC 
TPP 
VAR 

PP  v 

VAPT 
TEP 
EP  V 
HE  S 

VAP 
STEP 

VAP 
V\P! 
o  VA 
P  VA 


"V  R  I  P 

VARIABLE, 

VAR! ABLE, 
ACTABLE, 
VAR I  ABLE, 
ABLE, 
VARIABLE. 

T  ABLE, 

V  A  R  I  A  3L  E , 
IA3LE, 
TABLE, 

TABLE, 
VARIABLE, 
I  ABLE, 
\c  IAELC, 

ABLE, 
VARIABLE, 
Ac  TABLE, 

Y  <;  t=  m  h  a  <; 

TABLE, 
V  ARI ABLE 

! ABLE, 
ABLE, 
R  I  ABLE, 
=  1  ABLE, 


RIABLE, 

.DEPARTURE    RA 
E    RANDOM    L^NF 
UNDLE    RANDOM 
SHIP. INTED.DF 


NDOM    LINEAR    V  ARI  ABLE, 
A R    VARIABLE, 
L  INCAR    VART  ABLE, 
PAR'HJRp    RANDOM    LINEAR 


PER. 
PFF  . 
PER. 
EF.B 
PER. 
.PER 
.PER 
.PER 
PER. 
GRCU 
GRCU 
GRCL 
EAR 


BUNDLE 
BUNDLE 

BUNDLE 
UNDLE 
RFO  R  \ 
.REQ  R 
.REQ  R 
.REQ  R 
RCQ  PA 
P.PR.OC 
P. PROD 
P.PRnc 
VAR IA8 


R  ANDQM 
RANDOM 

RANDOM 
RAND  CM 

ANDOM  L 
AN  OHM  |_ 
ANDnM    L 

NHHM     [_T 

CSS.TTM 

ESS 
ESS 
LE 


T  T  M 

TTM 


LT 
LI 

LI 
LIN 
NEA 

I  ME 
INE 
TNE 
NEA 
E  P 
E  R 
E 


NE 

NE 
NE 
EA 

P 

AR 

A  c 
p. 

AM 
AN 


Ac    VARIABLE, 
AR    VARIABLE, 
AP    VART  A  ALE, 
R    VARIABLE, 
VAciABLE . 

VA' TABLE, 

VAP I ABLC, 

VAP IABL-  , 
VAciABLE , 

DOM  LINE  AR  VARI ABL  =  , 
DOM  LINEAR  VARI ABL=, 


ION  ,TYPE,SORCE, NUMB EP. OF. PEGU  IS IT  IONS, OWNER  , 
, QLANTITY,B3AT, I TE w , ORDE R , TUG  VND 

INTEGER  VARIABLES 
E  AND  NR. TRUCKS  AS  1 -DI MENSI ON AL  ARRAYS 


DEFINE  LOCAT 

PRIORITY 

PLACE  AS 

DEFINE  CHANG 
i  i 

STATISTICS  ARE  COMPUTED  IN  THE  FOLLOWING  STATEMENTS 
i  t 

TALLY  MEAN.l.WA 
AS  THE  VARI 


AS  THE  MINI 
TALLY  ME AN. 2. W A 

AS  THE  VARI 


AS  THE  MINI 

TALLY  ME  AN. 3. W A 

AS  THE  VARI 


IT. TIME  AS  THE  mcan,  VAR. 1. WAIT 
AMCE,  SD. 1 .WATT. TIME  AS  THE  STD 
MAX.  1. WAIT. Tl vc  4S  THc  MAXIMUM, 
MIN.l.WA IT .T [MP 
MUM  CF  1  .WAIT. TIME 
IT. TIME  AS  THC  MEAN,  VAP.. 2. WAIT 
ANCE,  SD.2.WAIT.TIMC  AS  ^HE  STD 
MAX.?. WAIT. tjmp  AS  THE  MAXIMUM, 

MIN. 2. WAIT. TIME 

MUM  CF  2.WATT.T^ME 


•  T  T  M  E 
.DEV, 


IT. TIME  AS 
ANCE,  SD.3 
MAX. 3. WAIT 
MIN.3.WA I 


THE  MEAN,  VAC. 3. WAIT 
W A 'T.TIM-  AS  "Hc  STD 
ttvp  AS  THF  M^XT^UM, 
TIME 


.  TI  MF 
.DEV, 


.  TIME 
.DEV, 


AS  THE  MINIMUM  OF  3.WA I 


ME 
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TALLY       M.WT. FINAL    AS    THE    MEAN  * V„ WT. FI NA L    AS    TH=    STn.Qev 

MX. WT. FINAL    AS 

THE    MAXIMUM, MIN.hT. FINAL     AS    THE    MINIMUM 

TALLY    F. TOTAL. R5Q    AS    TH=     SUM    qp    TOT.anQ 

END 


CF    WT.FINAL.SHIPPEH 
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MAIN 
i  i 

THE  NEXT  TWO  STATEMENTS  DIMENSION  VARIABLES 
i  t 

RESERVE  CHANGE  AS  5 
RESERVE  NR. TRUCKS  AS  12 
READ  SEED.V(l) 
t  i 

THE  NUMBER  OF  SHIPS  IS  READ 
«  t 

READ  N.SHIP 
CREATE  EVCRY  SHIP 

FOR  EVEF Y  SHIP  RF^D  TYPC(SHIP),  LOG  ATI  on < SH IP ) 
i  i 

THE  NUMBER  OF  PCRTS  IS  ?EAD 
i  i 

READ  N.PORT 
CREATE  EVERY  PCRT 

FOR  EVEFY  SHIP  FILE  TH I S  SHIP  IN 
SHI  P. QUEUE {LOCATION (SHIP) ) 
PRINT  1  LIME  THUS 

PORT     SHTP  NP  . 
FOR  EVERY  PCRT  DO  THIS 

PRINT  1  LINE  WITH  PPRT,N. SHI  P. QUEUE ( PDRT )  AS  FOLLOW; 

LOOP 

FOR  EACH  SHIP  PRINT  1  LINE  WITH  SHIP,  LnC AT  I  ON  I SH I P  )  , 
TYPE (SHIP) 
AS  FOLLOWS 

I  1 

THE    FOLLOWING    LINES    READ    IN    THE    SYS'EM    ofiPAMETERS 
i  i 

READ    S AN. FRAN.SH I P.INTER. DEPARTURE, 

BETH. ST L.SHI  P. I NTER. DEPARTURE, 

AE.1UMDLE.  INTER. ARRIVAL* 

AFS.1UNDLE. INTER. ARRIVAL, 

AOR.1UNDLE.  INTER. ARR I VAL , 

MSO.IUNDLE.  INTER. ARR I VAL, 

A F.1UNDLE. INTER. ARRIVAL, 
AE.AL AM. PORT. CHANGE, 
AE. MARE. I SL. PORT. CHANGE, 
AE.  WE AP.STA. PCRT. CHANGE, 
A E. NSC. OAK. POP T. CHANGE, 
AE.  SAN. FRAN. PCRT. CHANGE, 
AE. TODD. PCRT. CHANGE, 
AE. BETH. STL. PCRT. CHANGE, 
AE. DEPLOY, 

AOR.  A  LAM. PORT. CHANGE, 
A OR. NSC. OAK. PORT. CHANGE, 
A  OR.  TODD. PORT. CHANGE, 
AOR.  BETH. PORT. CHANGE, 
AOP.DEPLCY, 
AFS. A  LAM. PORT. CHANGE, 
AFS  .NSC. OAK. PORT. CHANGE, 
AS  F.TODD. PORT. CHANGE, 
AFS. TRIP. A. PORT. CHANGE, 
AFS. DEPLOY, 
A R.AL AM. PORT. CHANGE, 
AR.MARE. I SL. PCRT. CHANGE, 
A R .IMS CCA K.  PORT  .CHANGE, 
AR. DEPLOY     READ 
MSC.  A  LAM. PORT. CHANGE, 
M SO .SAN. FRAN. PORT. CHANGE, 
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MO S. TODD. PORT •CHANGE, 
MS O.T.I .PGRT. CHANGE, 
MSO.MERRI . PC RT. CHANGE, 
MSC. P AC  IF. PCRT. CHANGE, 

MSC. DEPLOY, 
REG. PRIORITY, 

ALA.M.SHIP.  INTER.  DEDAPTijPE  , 
MAPE. ISLAND. SHIP. I  NT =R  .  Dz  P  AR  TURC  , 
AE.REG.PER.BUNCLE, 
AFS.REO. PER. BUNDLE, 
AOR .REQ. PER. BUNDLE, 
MSC. REO. PER. BUNDLE, 
AR .REQ. PER. BUNDLE, 
AE.CUAN.FER.REQ, 
AFS.OUAN. PER. REQ, 
AOR.OUAN.PEF  .REQ, 
MSC.CUAN.PER.REQ, 
AR. GUAM. PER .REC, 

DEPLOY. TIME, 
L. I SSUE. GROUP. PRICES S.T I M=, 
2. I SSUE. GROUP. PR OCES S.T I ^c , 
3. ISSUE.GROUP.PRPC=SS.TIM^ 

FCR    EVERY     SHI P    DO    THT  S 
i  i 

THIS    SECTION    SCFECULES    THE     IN!TIAL    RUNOLF 

PREPARATIONS     BY    EACH    SHIP    USIN^    CL^SS    PAPA^ETERS 
i  » 

IF    TYPE(SHIP)     EQUALS    I 

SCHEDULE    A    BNOLE. D RE P AR at  I  on 

GIVEN    SHIP  IN    A5.1UNOLE. INTER. ARRIVAL     DAYS 

ELSE 

IF    TYPE( SHIP)     EQUALS    2 

SCHEDULE    A    ENDL 5.PREPARAT ION 

GIVEN    SHIP  IN    AOR. 1UNDLE. INTER. A^p  TViL    DAYS 

ELSE 

IF    TYPE(SHIP)     EQUALS    3 

SCHEDULE     A     BNDLE. PRE  PAR Atj CN 

GIVEN    SHI°  IN    AFS.  rJNPLE.TNT"R .A=RI  V^L    Q^Y^ 

ELSE 

IF    TYPE( SHIP)     EQUALS    4 

SCHEDULE     A    BNDLE. PREPARATION 

GIVEN    SHIP  IN    MS^.IUMDLE.tmtpp.arpivAL    DAYS 

ELSE 

SCHEDULE    A     BMCL E.°P 'P AR ATION    GIVEN    SHIP 

IN    AF.1UNDLE. INTER. ARR I VAL    DAYS 

REGARDLESS 

REGARCLESS 

REGARCLESS 

REGARDLESS 
i  i 

THE  NEXT  POFT  MOVEMENT  IS  SCHEDULED  3ASCD  ON  THE  S^l°,c 

CURRENT  LOCATICN 
i  i 

IF    LOCAT  IOMSHIP)     EQUALS     1    SCHEDULE    A    Z  H  ANGE .  LnC  ATI  IN 
GIVEN    SHIP     IN    AL4M. SHIP. INTER. DEPACTUR=     DAYS 

ELSE 

IF    LOCAT  ION(SHIP)    EQUALS    2    SCHcr>iJL=    A    CH ANGE. LOCATI  ^N 
GIVEN    SHIP     IN    MARE. ISLAND. SHIP. INTER. DEPARTURE    DAYS 

ELSE 

IP  LOCAT  ION( SHIP)  EQUALS  3  SCHEDULE  *  CH ANGE . Lpr at:  ti 
GIVEN  SHIP  IN  EXPONENTIAL. F(16. 3333,1)  DAYS 

ELSE 

IF    LCCATION(SHIP)     FQUALS    4    SCHEQULC    A    CHANGE .LOCATT HN 
GIVEN    SHIP    IN    UNIFORM. F(9., 56. ,'  )     DAYS 

ELSE 

IF    LCCATION(SHIP)     EQUALS    5    SCHEniJL  =     &    CHANGE. LOC  *  TT  IN 
GIVEN     SHIP     IN     SAN.FP AN. SHIP. INT^Q.OEPARTURE     DAYS 

ELSE 

IF  LOCATICNi SHIP)  EQUALS  6  SCHEDULE  A  CHANGE. LOCATION 
GIVEN  SHIP  IN  UNIFORM. F ( 30.  ,34.  ,1)  DAYS 

ELSE 

IF  LCCATIONi SHIP)  EQUALS  7  SCHEDULE  A  CHANGE .LOCATION 
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HANGE.L^rAT!  ON 

CHANGE. L DC AT  I  IN 
CHANGE. LOCATION 


GIVEN    SHIP    IN    BETH. STL .SHTP#TNT=R.nEPAOTURE    DAYS 
ELSE 

IF    LOCAT  IQN(SHIP)     EQUALS    8    SCH-QULr    A    CHANGE. LOCATI ON 

GIVEN    SHIP    IN    DEPLOY. TIME    DAYS 
ELSE 

IF    LOCATION(SHIP)    PQUAL^    9    SCHEDULE    A 

GIVEN    SHIP    IN     7    DAYS 

IF    LOCAT  IOM(SHIP)    EQUALS     10     SCHEDULE     A 

GIVEN    SHIP    IN    UNIFORM. F(3., 78. ,i )     DAYS 
ELSE 

IF    LOCATIOMSHIP)    EQUALS    11     SCHEDULE    t 

GIVEN    SHIP     IN    44    DAYS 
ELSE 

SCHEDULE    A    CHANGE. LOCATION 

GIVEN    SHIP     IN    44    DAYS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARCLESS 

REGARDLESS 

PFGARDLESS 

REGARDLESS 

REGARCLESS 

LOOP 
t  « 

THE    STEADY-STATE    EVENT    IS     SCHEDULED 
i  i 

SCHEDULE    AN    EQUILIBRIUM    IN    14.    DAYS 

SCHEDULE    A     STOP .  S I  ^UL  ATICN    IN    37<3.    DAYS 
i  i 

THE     INITIAL     SHIPMENT    FROM    EACH    PORT     IS    SCHEDULED 
i  i 

FOR    EVERY    PCRT    SCHEDULE    A    SHIPMENT. TO    GIVEN 

PORT    IN     1.    CAY 
START     SIMULATION 
STOP 
END 
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EVENT 
t  i 

STATI 
i  i 

RESET 
FOR    E 


EQUILIBRIUM 
STICS    ARE    PESE^    FpR     STEADY-ST4^F 


THE    TOTALS    OF    l.WAIT 
ACH    PCF  T    RESET    TOTALS 
TCT.REO 
FOR     EACH    SHIP,     DC 

LET    T.SHIPPED(SHIP)     =    0 
LET    T.CHANGECSHIP)     =    0 


TIME*     2.WATt.ttme    ANO    3.WAT 
OF    WT.  FILIAL.  SHIPPED    AMD 


TM  P 


LOOP 

RETUR 
END 


N 
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EVENT       8NDLE. PREPARATION    GIVEN    VESSEL 

DEFINE    VESSEL    AS    AN    INTEGER     VA<MABLC 
t  t 

THE    NEXT    BUNDLE    PREPARATION    FnP     EACH    VESSEL     IS    OETERM  Pi  p.} 

AND    SCHEDULED 
1 1 

IF    TYPE(VESSEL)     ECUALS    1 

SCHEDULE    A    BNOLE. PREPARATION 

GIVEN    VESSEL     IN    A E . 1UNDL E. TNTER . ARR I VAL     DAYS 

ELSE 

IF  TYPE( VESSEL )  EQUALS  2 

SCHEDULE  A  eNrL E. ° R CR A' AT I  CM 

GIVEN  VESSEL  IN  AOP . 1 UNDLE . I NTER . ARP TV AL  DAYS 

ELSE 

IF  TYPE( VESSEL)  ECUALS  3 

SCHEDULE  A  BNDLE. PRC pap  AT  I ON 

GIVEN  VCSSEL  IN  AFS . 1UNDLE. INTER. ARRI VAL  DAYS 

ELSE 

IF    TYPE(VESSEL)     EQUALS    4 

SCHEDULE    A    ENDLE.P^EP  ARA^i^l 

GIVEN    VESSEL    IN    MS0.IUN0L6. INTER. ARR IVAL    DAYS 

ELSE 

SCHEDULE    A     eNDLE.PPEDAR ATThn    GIVEN    V=SS^L 

IN    AF.1UNOLE.  INTER. ARRIVAL    DAYS 

REGARCLESS 

REGARDLESS 

REGARDLESS 

REGARCLESS 
t  t 

THE    NUMBER    CF    REQUISITIONS    Pco    8UNPLE    AND 

THE    OWNER    OF    THE    BUNDLE     IS     DETERMINED 
i  i 

CREATE    A    BUNDLE 

LET    SORCE(EUNCLE)    =    VES3-L 

IF    TYPEl VESSEL)     ECUALS    1 

LET    NUMBER. OF. REQUISITIONS (BUNDLE)     ' 

INT.F{AE.REC.DE°.BUNDLE) 

ELSE 

IF    TYPE(VESSEL)     EQUALS    2 

LET    NUMBER. CF. =EQUI SITIONS ( BUNDLE)     = 

INT.FCAOR.REQ.P-R  .BUNDLE) 

ELSE 

IF    TYPE(VESSEL)     EQUALS    3 

LET    NUMBER. CF. REQUISITIONS! BUNDLC)     = 

INT.F( AFS. REG.  PER. BUNDLE) 

ELSE 

IF  TYPP( VESSEL)  =QUALS  4 

LET  NUMBER. CF. REQUT S I T IONS (BUNDLE)  = 

INT.F(MSC.REQ.PER.BUNDLE) 

ELSE 

LET  NUMBER. OF. REQUISITIONS (BUNDLE)  = 

INT.F( AR .R SO, PER. BUNDLE ) 

REGARCLESS 

REGARDLESS 

REGARCLESS 

REGARDLESS 
•  t 

THE  ARRIVAL  TIME  OF  THIS  BUNDLE  IS  SCHEDULE 

SCHCDLLE  A  ARRIVAL. OF. 3UNDLE  ^TVEN  PUNOLE  IN 

EXPONENT IAL  .F(3.886,  L )  TAYS 
RETURN 
END 
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EVENT    ARRIVAL. CF. BUNDLE    GIVEN    PACKAGE 

DEFINE    PACKAGE    AS    AM     INTEGER    VARIABLE 
i  t 

AS    EACH    BUNDLE     ARRIVES    IT     IS    RcOUCEn    TO 

THE     TOTAL    NUMBER    OF    "EO'J  I S  TT  TONS    AND    EA<~h    REQUISITThn 

IS    ASSIGNED    ITS    4TTPnuTCS 
i  i 

FOR    I     =    1    TO    NUMBER. OF. REOUTSTTICNS (PACKAGE)     Dn    THIS 
CREATE    A     REQUISITION 

LET    OWNER(REQUISITION)    =    SCRCE ( PACKAGE ) 
LET    wEIGHT(REOUISITIOM)    =     EX PONENT T AL . F ( 2 . , ! ) 
LET    VOLUMEfREQUISITION)    =    EXPONENTIAL. F{ 2. ,1 ) 
LET    PRIORITY(REQUISITION)     =    ^CQ.P3T^!^Y 
IF    SORCE< PACKAGE)     <    9 
INT. F(AE. CLAN. PER. REO) 


LET  QUANTITY  (REQUISITION!)  = 
L'T  QUANTITY<REQU  ISITI^N ) 
LCT  OUANTITY(REQUISITION) 
LET    QUA  NTT TY( REQUI SI TI ONJ 


FLSC 

IF    SOPCE(PACKAGE)        <    12 

INT.F( AOR.GUAN.PED.REQ) 

ELSE 

IF    SORCE< PACKAGE)        <     15 

INT.F( AFS.QUAN.PEP .RFQ) 

ELSE 

IF  SORCEt PACKAGE)   <  I? 

INT.F(MSO.CUAN.PEP.REQ) 

ELSC 

LET    OUANTITY(REO'JISITION)    =    I NT.F < AR . QUAN. PER .REQ ) 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 
i  i 

THE     PROCESSING    TIVE    POP.    EACH    REQUISITTnN     Ic     DETE°MIM=n 
AND    ITS    READY    FCR     SHI°MENT    Tiwc     IS    SCHEDULED 

IF    PRIORITYtREQUIST^TON)     EQUALS    3    SCHEDULE    A 
READY. FOP. SHIPMENT    GIVCN    REQUISITION 

IN    3. IS  SUE. GROUP. PROCESS. TIME    o\YS 

ELSE 

IF    PRIOR  ITY(REQUTSITION)     EQUALS    2    SCHC1ULE    A 
READY.FOR.SH!PMENT    GIVEN    REQUISITION 

IN    2. IS  SUE. GROUP. PROCESS. TIME    ^\YC 
ELSE 

SCHEDULE    A    R EAOY .FPQ .SH  I  PMENT    GIVEN    PEQJISITinN 

IN     I. ISSUE. CC'lP. PROCESS. TIME     uvr 

REGARCLESS 

REGARCLESS 

LOOP 
1 1 

THE  BUNDLE  IS  REMOVED  FROM  THE  SYSTE"  AND  memory  t5 

MADE  AVAILABLE 
i  t 

DESTROY  THE  BUNCLE  CALLED  PACKAGE 

RETURN 

END 
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EVENT    CHANGE. LOCATION    GIVCN    VCSSCL 

DEFINE    VESSEL    AND    OLD.LOCATION    AS    INTEGER    VARIABLES 

•  t 

THE    VESSEL    MOVEMENT    STATISTICS    ARE    rnMPijT  =  0 
t  i 

ADD     1    TO       T.CHANGEt VFSSCL) 

ADD    1    TC    CH£NGE(TYPE(VCSSEL ) ) 

•  t 

THIS     SECTION    LOCATES    THE    NEXT    PORT    THE    SHT P     IS    AT 
t  i 

LET    OLD. LOCATION    =    LOC AT! ON ( VE^ S EL ) 

IF    TYPEf VESSEL)     EQUALS  I    AND    OLD. LOCATION    EQUALS    1 

LET    LOCATICN(VESSEL)     =     AE.ALAM. °ORT. CHANGE 
ELSE 

IF    TYPE* VESSEL)     EQUALS  1    AND    OLD. LOCATION    -QUALS    2 

LET    LOCATICN(VESSEL)     =     AE . "ARE . I SL . PORT . CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  1     AMD    OLD. LOCATION    "QUALS    3 

LET    LCCATION(VESSEL)     =  AE. WEAP.STA. PORT. CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  1    AN?    OLD. LOCATION    "QUALS    4 

LET     LOCATION(VESSEL)     =  AE. NSC. OAK. PORT. CHANG E 
ELSE 

IF    TYPE(VESSEL)     EQUALS  L     4^n    OLD. LOCATION    EQUALS    5 

LET    LCCATIQN(VESSEL)     =  AE. SAN  .FRAN. PORT .CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  1     AMD    OLD  .LOC ATI  ON  EQUALS    6 

LET    LOCATION (VESSEL)     =  AE. TODD. PORT. CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  1    AND    OLD.LOCATION    EQUALS    7 

LET    LCCATI ON(VESSEL)     =  A E . BETH.STL . PORT . CH ANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  L    AND    OLD. LOCATION    EQUALS    3 

LET    LOCATIGN(VESSEL)     =  AE. DEPLOY 
ELSE 

IF    TYPE(VESSEL)     EQUALS  2    AND    OLD. LOCATION    EQUALS    I 

LET    LOCATICN(VESSEL)     =     ACR . ALAM .pnq- .CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  2    AND    OLD. LOCATION    EQUALS    4 

LET    LOCATION(VESSEL)     =  AOR . NSC .0 AK. PORT. CHAM GE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  2    AMD    PLD. LOCATION  EQUALS    6 

LET    LOCATION (VESSEL)     =  AOR .TOCO.  PORT .CHANGE 
ELSE 

IF    TYPE( VESSEL)     EQUALS  2    AND    OLD. LOCATION    EQUALS    7 

LET    LOCATION(VESSEL)     =  AOR . BETH. PORT .CHANGE 
ELSE 

IF    TYPE{ VESSEL)     EQUALS  2    AND    OLD.LOCATION    EQUALS    3 

LET    LCCATION(VESSEL)     =  AOR. DEPLOY 
ELSE 

IF    TYPE(VESSEL)     EQUALS  3     AND    OLD. LOCATION    -QUALS    1 

LET    LOCATICNt VESSEL)     =     AFS. ALAw ,PORT. CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  3    AND    OLD.LOCATION    "QUALS    4 

LET    LCCATI ON(VESSEL)     =  AFS . NSC .OAK . PORT . CHANGE 
ELSE 

IF    TYPE(VESSEL)     EQUALS  3     AND    OLD.LOCATION  EQUALS     5 

LET    LOCATION ( VESSEL)     =  A SF . ^COO . PO^T .CHANG^ 
ELSE 

IF    TYPE( VESSEL)     EQUALS  3     AND    OLD.LOCATION    EQUALS    8 

LET    LOCATION( VESSEL)     =  AFS.OEPLOY 
ELSE 

IF    TYPE( VESSEL)     EQUALS  3     AND    OLD .LnC A^ I ON    EQUALS    9 

LET    LOCATION (VESSEL)     =  A F S . TR I D . A . PORT. CHANG E 


71 


ELSE 

IF    TYPE( 

LET 
ELSE 

IF    TYPE( 
LET    LCCA 
ELSE 
IF    TYPE* 
LET    LGCA 
ELSE 
IF    TYPE( 
LET     LCCA 
ELSE 
IF    TYPE< 
LET    LCCA 
ELSE 
IF    TYPE( 
LET    LCCA 
ELSE 

LET  LCCA 
IF    TYPE( 

LET 
ELSE 
IF    TYPE* 

LET 
ELSE 

IF  TYPE( 
LET  LOCA 
ELSE 

IF  TYPE< 
LET  LCCA 
ELSE 

REGARCLE 
REGARDLE 
REGARCLE 
REGARDLE 
REGAROLE 
REGARCLE 
REGAROLE 
REGARCLE 
REGARCLE 
REGARDLE 
REGARCLE 
REGARDLE 
REGARDLE 
REGARCLE 
REGARDLE 
REGARCLE 
REGARDLE 
REGAROLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REGARDLE 
REMOVE  T 
FILE    THI 


THIS 
t  i 

IF    L 

GIVEN    VE 

ELSE 

IF    L 
GIVE 

ELSE 

IF    L 


VESSEL)    EQUALS    4    AND    QLD.LOCATION    EQUALS    1 
LOCATICN(VESSEL)     =    MSO.ALAM. PORT. CHANGE 

VESSEL)    EQUALS    4    AND    nLD.LnCATT3N    EQUALS    5 
TIQM (VESSEL)    =    MSO .SAN. FRAN. PORT. CHANGE 

VESSEL)     EQUALS    4    ANH    OLD.LDCATinN  <=QUAL 

TIGN(VESSEL)    =    *0S . TD^D  .  PQ3T .C HANGE 

VESSEL)     EQUALS    4    ANT    OLD. LOCATION    CQUALS    3 
TION(VESSEL)     =    MSO. DEPLOY 

VESSEL)     EGUALS    4    AMD    OLD. LOCATION    EQUALS    10 
TION(VESSEL)     =    MSn  .  T  .  t ,PORt. CHANGE 

VESSEL)    EQUALS    4    AND    OLD. LOCATION    EQUALS    11 
TION(VESSEL)     =    MSO .MERR I .PORT. CHANGE 

TION< VESSEL)     =    MSO. P ACIF. PORT. CHANGE 
VESSEL)     EQUALS    5     4ND    OLD. LOCATION    EQUALS    1 
L3CATICMVESSEL)     =     AP  .  AL  AM  .  pnpr  .CHANGE 

VESSEL)     EQUALS    5     AND    OLD. LOCATION    EQUALS    2 
LnCATIGN(VESSEL)     =    AR. MARE . IS L. PnRT . CHANGE 

VESSEL)     EQUALS    5     AND    r'l.D  .LGCAT  TON    EQUALS 
TION(VESSEL)     =    AR . NSC . nAK. PORT. CHANG E 

VESSEL)     EQUALS    5     AND    OLD-LOCATION    CQUALS 
TIIM(VESSEL)     =    AR. DEPLOY 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

SS 

HIS    VESSEL    pROv    SHI  o.OUFUE(  HLO.LPC\Tin>!  ) 

S    VESSEL    IN    SH!P.QUEUE(LCCATIOM(VESS EL ) ) 

SECTION    THEN    5CHSDULCS    THE    NEXT    PCRT    CHANGE    FOP    th 

OCAT  ION (VESSEL)     EQUALS    1    SCHEDULE    4     CHANGE. LOCA 
SSEL     IN    ALA*. SHIP.  IMTER.DEDARTUoc:    ^AYS 

OCAT ION( VESSEL)    EQUALS    2    SCHEDULE     *    CHANGE. LOCA 
N    VESSEL    IN    MARE. ISLAND. SHIP.INTER. DEPARTURE.    D 

OCATICN(VESSEL)     EQUALS    3    SCHEDULE     \    CHANGE. LOCA 


S    6 


T   *      V 
r  T  "]\| 

\YS 

T  Tl 
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EVE 

DEE 
t  t 

THE 

VOL 
i  t 

LET 
LET 
FIL 

LET 

ADD 
ADD 
RET 
END 


NT    READY. FOR  .SHIPMENT    G!VCN    R EQ 
INE    REQ    AS    AN     INTEGER    VA9I&RLE 

SHIPPING    DESTINATION     IS    FHUNC    AND    T!^c,     WEIGHT,     \m 
UME    STATISTICS    ARE    COMPUTED 

PORT    =    LQCATION(OWNER{REQ)  ) 
REQUISITION    =    REQ 

E    REQUISITION  t  m    the     Sh! po! NG . QUE J^ ( PORt) 

TIME.  READY.  FGR.SHIPC PEQ)    =    ttvjp.v 
QUANTITY(REQ)*'wEIGHT{PFQ)     tq    wT.  SHI  0P  =  r»  (  PQPT  ) 
QUANTITY(REQ)*VOLUME{REQ)    tq    VOL .SHI PPED (PORT) 

URN 
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GIVEN    VESSEL     IN    E  XPONE  NT  I AL  .  F  (  16  .  3333  ,  1  )     DUS 
ELSE 

IF    LCC  AT  ION  (VESSEL)     EQUALS    4    SCHEHULC    A    CHANGE  .  LOCA  T  T  ON 

GIVEN    VESSEL     IN    UNI FOR M . F (9 .  ,56 . t  1 )     nAYS 
ELSE 

IF    LCCATICN(VESSEL)     EQUALS     5    SCHEDULE    A     CHANGE .  LOCA.~  T  ON 

GIVEN    VESSEL     IN    SAN. FR AN. SHI  P. INTER .DEPARTURE    DAYS 
ELSE 

IF    LOCATION(VESSEL)     EQUALS    6    SCHEDULE    A    CHANGE . Ln~AT I ON 

GIVEN    VESSEL     IN    UNT  POP  M  .c  (  30  .  ,  84.  ,  1 )     HAYS 
ELSE 

IF    LOCATIONC VESSEL)     CQUALS    7    SCHEDULE    A    CHANGE. LOCATION 

GIVEN    VESSEL     IN    BETH .STL . SH I  P. I MTE5 .nE°AR TURE    DAYS 
ELSE 

IF    LOCATICM  VES^CL)     CQUA|_S    8    SCHEDULE    A    CHANGE .  LOCATI  ON 

GIVEN    VESSEL    IN    DEPLOY. TI^E     CAYS 
ELSE 

IF    LOCATION*  VESSEL)     EQUALS    9    SCHEDULE    A    CHA  NGE  .  LCC  r it T  ON 

GIVEN    VESSEL     IN    7    DAYS 
ELSE 

IF    LOCATICN(VESSEL)     "DUALS    iC    SCHEDULE    A    CHANGE .LOC A TIHM 

GIVEN    VESSEL    IN    UNI E^Q m . F { 3 . , 75 . , 1 )     DAYS 
ELSE 

IF    LCCATION(VESSEL)     EQUALS     11    SCHEDULE    A    CHANGE .LOCATION 

GIVEN    VESSEL     IN    44    DAYS 
ELSE 

SCHEDULE    A    CHANGE. LOCATtoN 

GIVEN    VESSEL     IN    44    DAYS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 

REGARDLESS 
i  i 

MATERIAL    IS    REMOVED    FORM    Tme    VESSEL'S    nLD    LOCATION    OUEJE 

AND    ADDED    TO    THE    VESSELS    CURRENT    LOCATION'S     QUEUE 
t  t 

FOR    EACH    REQUISITION    IN    SHI  OPING. QUEUE {OLD. L OC AT  ION ) 

WITH    OWNER (PEGU!SITI DN )     =    VESSEL    n0    THIS 
REMOVE    THIS    REQUISITION    FRGM    SH I  PR ! NG.QUFU F{ 3L D .LD<- AT !]" ) 
FILE    THIS    REQUISITION    IN    SM  ipp I NG. OUcUc ( L 3C AT  I  IN ( VES Sr L )  ) 
SUBTRACT       GUANTIty(r  =  cUTSITION)*    WE  I  GH  T  {  R  EQU  T  3  I  TT  ON  ) 
FROM  WT.SHI FPEC  (r LD. LOCATION) 

SUBTRACT       GUANTITY(RCQLI SI TIDN)»    VOLUME { REQUI SI TI IN ) 
FROM         VOL.SHIPPEC(r>Lr'.LOCA~TnN) 

ADD    QUANTITY(REQUISITIOKj)*    WE  I GH T( R- QU I S I TI OM )     T0 

WT.SHIPPEC (LOCAT TON (VESSEL ) ) 
ADD    QUANTT  TY  (  R  EQUI  S  I  "<"  T  PM  )  *    VOLUME  (  R  CQU  I  S  I  T  ION  )     T^ 
VOL. SHlPPED(LOrATioN( VESSEL) ) 

LOOP 

RETURN 

END 
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EVENT  SHIPME 
DEFINE  DESTI 
IF  N.SHIPPIN 
GC  TO  • 
ELSE 
•SHIP' 
t  i 

STATISITICS 
i  t 


NT. TO    GIVE*'    DESTINATION 
NATICN    AS    AN     INTEGER    VARIABLE 
G.CUEUE(DESTINATION)     EQUALS    0 
FIRST* 


ARE    CC^P'JTcn 


AOD     1    TO    NR.TRUCKSJDESTINATION) 

LET    WT.  FINAL  .SH I PP ED ( DE> T  INATTQN  )    =    WT.SHI  »P  ED  {  OEST INAT  1 ON) 
LET    VOL.  FINAL. SHI P°CD (DE STI N ATI  ON)     = 
VOL. SHIPPED (DESTI NAT  ION) 

LET    TOT.REQ(DESTIMATION)     =    N  .SHIPP  ING. QUEUE*  DESTINATION!  ) 
LET    wT.SHIPPED(DESTINATION)     =    0 
LET    VOL. SHIPPEC (DESTINATION)     =    0 

FOR    EACH    REQUISITION    IN    SHI PPING.QUEUE< DESTI MAT  ION ) DO    tmts 
IF    PRIQRITY(REGUISITION)     =    1    LET    1. WAIT. TIME    =    TIMF.V 
TIME. RE AOY.FCR.S HIP (REQUISITION) 

IF    PRIOR ITV(REOUISITIOM)     =    2    LET    2. WAIT. time    =    TIMF.V 
-TIME. RE ADY.FGR. SHIP (REQUISITION) 


ELSE 


3. WAIT. TIME    =    TIMc.v    -    TIME.R .EADY . cnR . S HI  s> ( R -OUT  SI  T T hn ) 
CLESS 
DLESS 
TO    T.S 

E  THE  R 
OY  REOO 


ELSE 
LET 
PEGAR 
REGAR 
ADD  1 
REMOV 
DESTR 
LOOP 
•FIRST' 
»  • 

THE    NEXT    SHI 

AND     SCFECULE 
i  i 

IF    TIME.V    = 

SCHEDULE    A    S 

ALWAYS 

RETURN 

END 


HIPPED(0WNC3  (^cQL'!SITION)  ) 

EOUISITTON    cROM    SHIPPING. OUEUE(DESTI^ATTnM, 

ISITICN 


D 


"HIS  PnoT  is  COMPUTED 


INT.F(TIME.V ) 

HIFMENT.TO    GIVEN    DESTINATION    IN    1 


DAY 
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APPENDIX    2 


CASE    II 


DE  STINATION 

I N T F G p R    viCT5^Lc 
INATTCM)     EQUALS    0 


TI 


EVENT  SHIPMENT. TO  GIVEN 
CEFINC  OESTINATICN  AS  AM 
IF  N. SHIPPING. CUEUECDEST 

GO  TO  'FIRST* 
*  t 

DECISION    RULES    FOR    CASE 
i  t 

IF     INT.F (TI^E.V/7. )     EQUALS     Ttmc.v/7# 

GO    TO    • SHIP* 
EL  S  E 

GO    TO    ' FI»ST* 
ELSE 
•SHIP* 
i  ( 

STATISITICS    ARE    COMPUTED 
i  i 


ADD 

LET 

LET 

VHL. 

LET 

LET 

LET 

FOP. 


ELSE 


1  TO 
WT.F 
VCL. 
SHIP 
TOT. 
WT.S 
VCL. 
EACH 
IF  P 
-TIM 


NR.TRU 
INAL .SF 
FINAL. S 

PEO(OES 
REQ( DES 
HIPPED{ 
SHIPPED 
REOUIS 
RIORITY 
E.PE AD> 


FLSE 
LET 
REGA 
REGA 
ADD 
PEMQ 
DEST 
LOOP 
•FIR 
i  • 


IP    PRIORITY 

-TIME. READY 


CKS(CEST! 

IPPEO(QES 

FIP?E0(DE 

TINATION) 

TINATIOM) 

CESTTN^TT 

(DESTINAT 

IT  ION    IN 

(REQUISTT 

.FCR.SHI? 

(REGUISIT 
.FOR.^HI? 


MAT  TOM) 

TTNATInN)     =    WT. SHI PP ED( OEST 

STIN4TTQN)     = 

=    IM.  SHIPPING. QUEUE  (  DESTINA 
nM  )     =0 
TON)     =    0 

SH!  ap^lG.QUPUPClcSTI  NATtpnj) 
ION)    =    L    Lct    l.WAI^.TIME    = 
(REQUISITION) 

TON  )     =    2    LET    2. WAIT. TIME    = 
(REQUISITION) 


IN A' ION) 
TIONJ 


no   t 

TIME 


H  T  ^ 

.v~ 


IME.V 


3.WAIT.TIWE    =    ttmc.V    -    TIME. READY. FOR. SHIP(REQUISI 
RCLESS 
RCLESS 

1     TO    T.SHI PPECMOWNER 
VE    THE    REQUISITION    c 

RCY  REQUISITION 


(REQUISITION) ) 

rh.m  SHIPPING. QU  =  "C(  PEST  INATJONJ 


ST 


HIS     DC°T     IS    C0MD'JTE0 


THE     NEXT    SHI PMENT    FQO 

AND    SCHEDULED 
«  t 

IF    TIME.V    =     INT.F(TIME.V) 

SCHEDULE    A    SHIPMENT. tq    GIVEN    DESTINATION    IN     1.     niy 

ALWAYS 

RETURN 

END 
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APPENDIX  F 


CASE  III 


EVE 
DEF 
i  t 

THE 

VOL 
t  i 

LET 
LET 
FIL 
LET 
ADD 

ADO 
f  t 

DEC 
•  i 

IF 

POR 
ALW 

RET 
END 


NT  READY. FOR. SHIPMEMT  GIVEN  RcO 
INE  REQ  AS  AN  INTEGER  VARIABLE 

SHIPPING  DESTINATION  IS  FCUNC  *ND  TIME,  WEIGHT,  v~ 
UME  STATISTICS  ARE  COMPUTED 

PORT  =  LCCATICNfQWNERl REQ) ) 
REQUISITION  =  REQ 
E  REOUISITICN  IN  THE  SHI PP T NG. QUEUE ( 3rRT) 

TIVE. READY. FCP.SHID(?CQ )  =  T!MC.V 
QUA.MTITY(REQ)*wciGHT(PEQ)  'C  W^  .  SHI  oph  (  phot  ) 
QUANTITY  (REC)*VTL'JME  (R  EO)  T0  VnL  .  SHI  pd  =0  (  POR  T) 

IS  ION  RULES  FOR  CASE  III 

PRIORITY! REG)  EQUALS  I  SCHEDULE  \    SHIPMENT.TO  GIVEN 

T  NOW 

AYS 

URN 
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APPENDIX  G 


CASE  IV 

EVENT  SHIPMENT. TO  GIVEN  DESTINATION 
DEFINE  DESTINATION  AS  AM  !NTEGCR  VARIABLE 
IF  N.SHI PPIMG.CLEUE(CESTINATION)  EQUALS  0 

GC  TO  'FIRST* 
t  « 

DECISION    PULES    FCR    CASE    IT 
t  t 

IF    INT.F(TIME.V/7. )     EQUALS     Ttm=.V/7. 
GO    TO     'SHIP* 

ELSE 
t  i 

DECISION    RULES    FCR    CASE     IV 
t  i 

FOR    EACH    REQUISITION    IN    SH  I  PPI  MG  .Q1  JEUE  HE^  T  I  MAX  ton  ) 

WITH    PR  IORITYCREQUI SI TICN)     <    3,    PINO    THE    FI^ST    CASE 
IF    NONE,     GO    TC    FIRST 

ELSE 

•SHIP* 
i  i 

STATISITICS    ARE    COMPUTED 

ADD    1     TO    NP. TRUCKS* DESTINATION) 

LET    toT. FINAL. SHI  PPEDOEST!  NATION )    =    WT.SHIPP  ED<  DEST  INAT  ION  ) 

LET     VCL.FIN/L.SHIPPcD(DESTIN'ATIOM}     = 

VOL.SHIPPED(DESTINATION) 

LET    TCT.REG(DESTINATTnr)     =    \j  .SHI  0PING  .01  'FUE  (  OEST  INAT  pm  ) 

LET    WT.SHIPPED(DESTINATION)     =    0 

LET    VCL.SHIPFEC < CEST TNAT I  ON )     =    0 

FOR     EACH    REQUISITION    IN     SH  I  PP  ING. QUEUE  (  DEST  I  NATION  )  00    THIS 

IF    PRIORITY (REQUISITTON )     =     1    LrT    I. WAIT. TIME    =     TIMF.V 

-TI ME. READY. FCR. SHIP {REQUISITION) 
ELSE 

IF    PRIOR  ITY(REGUtSITION)     =    2    L"T    2.WA!T.TIME    =     tim=.V 

-TIME. READY. FCR. SHI P ( ° ECU  I S I TI ON ) 
ELSE 

LET    3. WAIT. TIME    =    TIME.V    -    TI  vc  .RcAOY.  PC=  .  <:  HI  o  {  REQUT  SI  ~T  ON 
REGARDLESS 
REGARDLESS 

ADD     1     TO    T.SHlPPECnWNFRfCEGniSTTiaN')  ) 

REMOVE    THE    REQUISITION    FRO*    SH! PPING. QUEUE { OEST INAT  ION ) 
DESTROY    REQUISITION 
LOOP 

•FIRST' 
i  i 

THE  NEXT  SHIPMENT  FOR  this  phot  is  CQMP'JTFQ 

AND  SChECULED 
i  t 

IF  TIME.V  =  INT.F{TI^E.V) 

SCHEDULE  A  SHIPMENT. TO  GIVEN  D^ S TI NAT I  ON  IN  I.  D*Y 

ALWAYS 

RETURN 

END 
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APPENDIX  H 


DETAILED  RESULTS  3ASE  I 


TRIAL 

ISSUE 

MEAN 

STD 

MAX 

MIN 

TOTAL 

GROUP 

TIME 

DEV 

TIME 

TIME 

TRIPS 

1 

1 

.47 

.28 

.98 

.01 

1 

2 

.50 

.29 

1.00 

.00 

1 

3 

.50 

.29 

1.00 

.00 

2351 

2 

1 

.47 

.29 

.99 

.00 

2 

2 

.50 

.29 

1.00 

.00 

2 

3 

.50 

.29 

1.00   . 

.00 

2231 

3 

1 

.49 

.29 

.95 

.00 

3 

2 

.50 

.29 

1.00 

.00 

3 

3 

.50 

.29 

1.00 

.00 

1385 

4 

1 

.48 

.28 

.96 

.02 

4 

2 

.50 

.29 

1  .00 

.00 

4 

3 

.50 

.29 

1.00 

.00 

2267 

5 

1 

.46 

.32 

.99 

.01 

5 

2 

.50 

.  29 

1.00 

.00 

5 

3 

.50 

.29 

1.00 

.00 

2273 

• 

6 

1 

.52 

.28 

1.00 

.06 

6 

2 

.50 

.29 

1  .00 

.00 

6 

3 

.50 

.29 

1.00 

.00 

1947 

7 

1 

.48 

.30 

1.00 

.01 

7 

2 

.50 

.29 

1  .00 

.00 

82 


50 


29 


1.00 


00 


2079 


8 

1 

.50 

.29 

1.00 

.00 

8 

2 

.50 

.29 

1.00 

.00 

8 

3 

.50 

.29 

1.00 

.00 

2034 

9 

1 

.52 

.30 

1.00 

.00 

9 

2 

.50 

.29 

1.00 

.00 

9 

3 

.50 

.29 

1.00 

.00 

2314 

10* 

CAS 

E  II 

IAL 

ISSUE 

MEAN 

SID 

MAX 

MIN 

TOTAL 

GROUP 

TIME 

DEY 

TIME 

TIME 

TRIPS 

1* 

2 

1 

3.  61 

1  .  91 

6.33 

.17 

2 

2 

3.60 

2.00 

7.00 

.00 

2 

3 

3.  61 

1.99 

7.00 

.00 

332 

3 

1 

3.60 

1.  71 

6.93 

.04 

3 

2 

3.43 

2.01 

7.00 

.00 

3 

3 

3.  41 

2.00 

7.00 

.00 

336 

4* 

5 

1 

3.  47 

2.02 

6.97 

.02 

5 

2 

3.51 

2.05 

7.00 

.00 

5 

3 

3.49 

2.07 

7.00 

.00 

341 

6 

1 

3.45 

1.88 

6.90 

.06 

6 

2 

3.52 

2.00 

7.00 

.00 

6 

3 

3.53 

2.01 

7.00 

.00 

283 

7* 

8 

1 

3.  27 

1.  91 

6.96 

.43 

8 

2 

3.52 

2.02 

7.00 

.00 

8 

3 

3.  52 

2.01 

7.00 

.00 

303 

9* 
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10* 


CASE 

III 

TRIAL 

ISSUE 

MEAN 

STD 

MAX 

MIN 

TOTAL 

GROUP 

TIME 

DEV 

TIME 

TIME 

TRIPS 

1* 

2 

1 

.  00 

.00 

.00 

.00 

2 

2 

2.92 

1.  99 

7.00 

.00 

2 

3 

2.  93 

1.  99 

7.00 

.00 

403 

3 

1 

.  00 

.00 

.00 

.  00 

3 

2.  91 

2.00 

7.00 

.00 

3 

3 

2.89 

1.98 

7.00 

.00 

430 

4 

1 

.  00 

.  00 

.00 

.00 

4 

2 

2.  90 

1.98 

7.00 

.  00 

4 

3 

2.89 

1.98 

7.00 

.00 

413 

5 

1 

.CO 

.  00 

.00 

.00 

5 

n 

*. 

2.  96 

1.  99 

7.00 

.00 

5 

3 

2.93 

2.01 

7.00 

.00 

397 

6 

1 

.  00 

.00 

.00 

.00 

6 

2 

2.  80 

1  .  95 

7.00 

.00 

6 

3 

2.78 

1.  95 

7.00 

.  00 

370 

7* 

8 

1 

.00 

.  00 

.00 

.00 

8 

2 

3.  04 

2.02 

7.00 

.00 

8 

3 

3.04 

2.01 

7.00 

.  00 

353 

9* 

10* 

CASE    IV 


TRIAL       ISSUE         MEAN  STD  MAX  MIN  TOTAL 

GROUP         TIME  DEV  TIME  TIME  TRIPS 
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1 
1 
1 

2 
2 
2 

3 
3 
3 

4 
4 

4 

5 
5 
5 

6 

6 
6 

7 
7 

7 

a 

8 
8 

9 

9 
9 


1 

.00 

2 

.49 

3 

.51 

1 

.00 

2 

.48 

3 

.52 

1 

.00 

2 

.49 

3 

.52 

1 

.00 

2 

.48 

3 

.53 

1 

.00 

2 

.49 

3 

.52 

1 

.00 

2 

.49 

3 

.51 

1 

.00 

2 

.49 

3 

.52 

1 

.00 

2 

.49 

3 

.51 

1 

.00 

2 

.49 

3 

.52 

00 

.00 

.00 

29 

1  .00 

.00 

38 

6.69 

.00 

00 

.00 

.00 

29 

1.00 

.00 

41 

6.95 

.00 

00 

.00 

.00 

29 

1.00 

.00 

38 

6.98 

.00 

00 

.00 

.00 

29 

1.00 

.00 

42 

6.89 

.00 

00 

.00 

.00 

29 

1  .00 

.00 

38 

6.87 

.00 

00 

.00 

.00 

29 

1  .00 

.00 

37 

6.91 

.00 

00 

.CO 

.00 

29 

1  .00 

.00 

38 

6.99 

.00 

00 

.00 

.00 

29 

1  .00 

.00 

36 

6.93 

.00 

00 

.00 

.00 

29 

1  .00 

.00 

38 

7.00 

.00 

1788 


1865 


1995 


1901 


1920 


1690 


1752 


1797 


2018 
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10* 


^Results  not  available 
exceeds  433,300  bytes. 


Computer  memory  space   required 
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